/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / edmacro.elc.z / edmacro.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 72 6d 73 40 6d 6f 6c |piled by| rms@mol|
|00000020| 65 2e 67 6e 75 2e 61 69 | 2e 6d 69 74 2e 65 64 75 |e.gnu.ai|.mit.edu|
|00000030| 20 6f 6e 20 53 75 6e 20 | 4d 61 72 20 20 33 20 30 | on Sun |Mar  3 0|
|00000040| 30 3a 32 34 3a 35 39 20 | 31 39 39 36 0a 3b 3b 3b |0:24:59 |1996.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 68 6f 6d 65 | from fi|le /home|
|00000060| 2f 66 73 66 2f 72 6d 73 | 2f 65 31 39 2f 6c 69 73 |/fsf/rms|/e19/lis|
|00000070| 70 2f 65 64 6d 61 63 72 | 6f 2e 65 6c 0a 3b 3b 3b |p/edmacr|o.el.;;;|
|00000080| 20 65 6d 61 63 73 20 76 | 65 72 73 69 6f 6e 20 31 | emacs v|ersion 1|
|00000090| 39 2e 33 30 2e 39 31 2e | 32 2e 0a 3b 3b 3b 20 62 |9.30.91.|2..;;; b|
|000000a0| 79 74 65 63 6f 6d 70 20 | 76 65 72 73 69 6f 6e 20 |ytecomp |version |
|000000b0| 46 53 46 20 32 2e 31 30 | 0a 3b 3b 3b 20 6f 70 74 |FSF 2.10|.;;; opt|
|000000c0| 69 6d 69 7a 61 74 69 6f | 6e 20 69 73 20 6f 6e 2e |imizatio|n is on.|
|000000d0| 0a 3b 3b 3b 20 74 68 69 | 73 20 66 69 6c 65 20 75 |.;;; thi|s file u|
|000000e0| 73 65 73 20 6f 70 63 6f | 64 65 73 20 77 68 69 63 |ses opco|des whic|
|000000f0| 68 20 64 6f 20 6e 6f 74 | 20 65 78 69 73 74 20 69 |h do not| exist i|
|00000100| 6e 20 45 6d 61 63 73 20 | 31 38 2e 0a 0a 28 69 66 |n Emacs |18...(if|
|00000110| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000120| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 29 0a 09 20 |macs-ver|sion).. |
|00000130| 28 6f 72 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(or (and| (boundp|
|00000140| 20 27 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e | 'epoch:|:version|
|00000150| 29 20 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e |) epoch:|:version|
|00000160| 29 0a 09 20 20 20 20 20 | 28 73 74 72 69 6e 67 2d |)..     |(string-|
|00000170| 6c 65 73 73 70 20 65 6d | 61 63 73 2d 76 65 72 73 |lessp em|acs-vers|
|00000180| 69 6f 6e 20 22 31 39 2e | 32 39 22 29 29 29 0a 20 |ion "19.|29"))). |
|00000190| 20 20 20 28 65 72 72 6f | 72 20 22 60 65 64 6d 61 |   (erro|r "`edma|
|000001a0| 63 72 6f 2e 65 6c 27 20 | 77 61 73 20 63 6f 6d 70 |cro.el' |was comp|
|000001b0| 69 6c 65 64 20 66 6f 72 | 20 45 6d 61 63 73 20 31 |iled for| Emacs 1|
|000001c0| 39 2e 32 39 20 6f 72 20 | 6c 61 74 65 72 22 29 29 |9.29 or |later"))|
|000001d0| 0a 0a 0a 23 40 31 33 34 | 20 2a 4e 6f 6e 2d 6e 69 |...#@134| *Non-ni|
|000001e0| 6c 20 69 66 20 65 64 69 | 74 2d 6b 62 64 2d 6d 61 |l if edi|t-kbd-ma|
|000001f0| 63 72 6f 20 73 68 6f 75 | 6c 64 20 6c 65 61 76 65 |cro shou|ld leave|
|00000200| 20 38 2d 62 69 74 20 63 | 68 61 72 61 63 74 65 72 | 8-bit c|haracter|
|00000210| 73 20 69 6e 74 61 63 74 | 2e 0a 44 65 66 61 75 6c |s intact|..Defaul|
|00000220| 74 20 6e 69 6c 20 6d 65 | 61 6e 73 20 74 6f 20 77 |t nil me|ans to w|
|00000230| 72 69 74 65 20 63 68 61 | 72 61 63 74 65 72 73 20 |rite cha|racters |
|00000240| 61 62 6f 76 65 20 5c 31 | 37 37 20 69 6e 20 6f 63 |above \1|77 in oc|
|00000250| 74 61 6c 20 6e 6f 74 61 | 74 69 6f 6e 2e 1f 0a 28 |tal nota|tion...(|
|00000260| 64 65 66 76 61 72 20 65 | 64 6d 61 63 72 6f 2d 65 |defvar e|dmacro-e|
|00000270| 69 67 68 74 2d 62 69 74 | 73 20 6e 69 6c 20 28 23 |ight-bit|s nil (#|
|00000280| 24 20 2e 20 2d 34 37 33 | 29 29 0a 28 62 79 74 65 |$ . -473|)).(byte|
|00000290| 2d 63 6f 64 65 20 22 c0 | c1 21 84 08 00 c2 11 c1 |-code ".|.!......|
|000002a0| 0b 42 13 09 84 1f 00 c4 | 20 11 c5 09 c6 c7 23 88 |.B......| .....#.|
|000002b0| c5 09 c8 c9 23 88 ca 0b | 42 13 cb 0b 42 13 cc 0b |....#...|B...B...|
|000002c0| 42 13 c2 87 22 20 5b 62 | 6f 75 6e 64 70 20 65 64 |B..." [b|oundp ed|
|000002d0| 6d 61 63 72 6f 2d 6d 6f | 64 65 2d 6d 61 70 20 6e |macro-mo|de-map n|
|000002e0| 69 6c 20 63 75 72 72 65 | 6e 74 2d 6c 6f 61 64 2d |il curre|nt-load-|
|000002f0| 6c 69 73 74 20 6d 61 6b | 65 2d 73 70 61 72 73 65 |list mak|e-sparse|
|00000300| 2d 6b 65 79 6d 61 70 20 | 64 65 66 69 6e 65 2d 6b |-keymap |define-k|
|00000310| 65 79 20 22 03 03 22 20 | 65 64 6d 61 63 72 6f 2d |ey ".." |edmacro-|
|00000320| 66 69 6e 69 73 68 2d 65 | 64 69 74 20 22 03 11 22 |finish-e|dit ".."|
|00000330| 20 65 64 6d 61 63 72 6f | 2d 69 6e 73 65 72 74 2d | edmacro|-insert-|
|00000340| 6b 65 79 20 65 64 6d 61 | 63 72 6f 2d 73 74 6f 72 |key edma|cro-stor|
|00000350| 65 2d 68 6f 6f 6b 20 65 | 64 6d 61 63 72 6f 2d 66 |e-hook e|dmacro-f|
|00000360| 69 6e 69 73 68 2d 68 6f | 6f 6b 20 65 64 6d 61 63 |inish-ho|ok edmac|
|00000370| 72 6f 2d 6f 72 69 67 69 | 6e 61 6c 2d 62 75 66 66 |ro-origi|nal-buff|
|00000380| 65 72 5d 20 34 29 0a 23 | 40 33 32 35 20 45 64 69 |er] 4).#|@325 Edi|
|00000390| 74 20 61 20 6b 65 79 62 | 6f 61 72 64 20 6d 61 63 |t a keyb|oard mac|
|000003a0| 72 6f 2e 0a 41 74 20 74 | 68 65 20 70 72 6f 6d 70 |ro..At t|he promp|
|000003b0| 74 2c 20 74 79 70 65 20 | 61 6e 79 20 6b 65 79 20 |t, type |any key |
|000003c0| 73 65 71 75 65 6e 63 65 | 20 77 68 69 63 68 20 69 |sequence| which i|
|000003d0| 73 20 62 6f 75 6e 64 20 | 74 6f 20 61 20 6b 65 79 |s bound |to a key|
|000003e0| 62 6f 61 72 64 20 6d 61 | 63 72 6f 2e 0a 4f 72 2c |board ma|cro..Or,|
|000003f0| 20 74 79 70 65 20 60 43 | 2d 78 20 65 27 20 6f 72 | type `C|-x e' or|
|00000400| 20 52 45 54 20 74 6f 20 | 65 64 69 74 20 74 68 65 | RET to |edit the|
|00000410| 20 6c 61 73 74 20 6b 65 | 79 62 6f 61 72 64 20 6d | last ke|yboard m|
|00000420| 61 63 72 6f 2c 20 60 43 | 2d 68 20 6c 27 20 74 6f |acro, `C|-h l' to|
|00000430| 20 65 64 69 74 0a 74 68 | 65 20 6c 61 73 74 20 31 | edit.th|e last 1|
|00000440| 30 30 20 6b 65 79 73 74 | 72 6f 6b 65 73 20 61 73 |00 keyst|rokes as|
|00000450| 20 61 20 6b 65 79 62 6f | 61 72 64 20 6d 61 63 72 | a keybo|ard macr|
|00000460| 6f 2c 20 6f 72 20 60 4d | 2d 78 27 20 74 6f 20 65 |o, or `M|-x' to e|
|00000470| 64 69 74 20 61 20 6d 61 | 63 72 6f 20 62 79 0a 69 |dit a ma|cro by.i|
|00000480| 74 73 20 63 6f 6d 6d 61 | 6e 64 20 6e 61 6d 65 2e |ts comma|nd name.|
|00000490| 0a 57 69 74 68 20 61 20 | 70 72 65 66 69 78 20 61 |.With a |prefix a|
|000004a0| 72 67 75 6d 65 6e 74 2c | 20 66 6f 72 6d 61 74 20 |rgument,| format |
|000004b0| 74 68 65 20 6d 61 63 72 | 6f 20 69 6e 20 61 20 6d |the macr|o in a m|
|000004c0| 6f 72 65 20 63 6f 6e 63 | 69 73 65 20 77 61 79 2e |ore conc|ise way.|
|000004d0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 65 64 69 |..(defal|ias 'edi|
|000004e0| 74 2d 6b 62 64 2d 6d 61 | 63 72 6f 20 23 5b 28 6b |t-kbd-ma|cro #[(k|
|000004f0| 65 79 73 20 26 6f 70 74 | 69 6f 6e 61 6c 20 70 72 |eys &opt|ional pr|
|00000500| 65 66 69 78 20 66 69 6e | 69 73 68 2d 68 6f 6f 6b |efix fin|ish-hook|
|00000510| 20 73 74 6f 72 65 2d 68 | 6f 6f 6b 29 20 22 08 85 | store-h|ook) "..|
|00000520| 5c 5c 01 c1 08 21 83 10 | 00 c2 08 21 82 11 00 08 |\\...!..|...!....|
|00000530| c3 1c 1d 0e 06 83 20 00 | 08 14 c3 15 82 8b 00 0d |...... .|........|
|00000540| c7 3d 84 2c 00 08 c8 9d | 83 46 00 0e 09 84 3a 00 |.=.,....|.F....:.|
|00000550| ca cb 21 84 3a 00 cc 20 | 88 0e 09 86 40 00 cd 14 |..!.:.. |....@...|
|00000560| c9 15 82 8b 00 0d ce 3d | 83 60 00 cf d0 21 89 15 |.......=|.`...!..|
|00000570| cd 98 83 5a 00 d1 d2 21 | 88 0d 4b 14 82 8b 00 0d |...Z...!|..K.....|
|00000580| d3 3d 83 6e 00 d4 20 14 | c9 15 82 8b 00 0d 84 7c |.=.n.. .|.......||
|00000590| 00 d1 d5 d6 08 21 5c 22 | 88 82 8b 00 0d 39 83 87 |.....!\"|.....9..|
|000005a0| 00 0d 4b 14 82 8b 00 0d | 14 c3 15 c1 5c 66 21 84 |..K.....|....\f!.|
|000005b0| 98 00 d1 d7 d6 08 21 5c | 22 88 d8 d9 21 88 70 1e |......!\|"...!.p.|
|000005c0| 1a db 5c 66 21 1e 1c dd | 0e 1c de 5c 22 1e 1f dd |..\f!...|...\"...|
|000005d0| 0e 1c 0e 20 3f 5c 22 1e | 21 e2 e3 21 1e 24 d8 e5 |... ?\".|!..!.$..|
|000005e0| 21 88 e6 0e 24 21 88 e7 | 20 88 e8 0e 29 21 88 c3 |!...$!..| ...)!..|
|000005f0| 16 2a eb 16 2c ed 16 2e | ef f0 21 0e 1a 4c 88 ef |.*..,...|..!..L..|
|00000600| f1 21 0e 32 4c 88 ef f3 | 21 0e 06 4c 88 f4 20 88 |.!.2L...|!..L.. .|
|00000610| f5 f6 b1 02 88 f7 0e 1f | f8 b1 03 88 0e 06 84 31 |........|.......1|
|00000620| 01 f9 0d 83 07 01 fa 0d | 21 82 08 01 fb f8 b1 03 |........|!.......|
|00000630| 88 fc 0d 86 12 01 5c 66 | fd 5c 22 89 18 83 2d 01 |......\f|.\"...-.|
|00000640| 08 83 30 01 fe dd 08 89 | 41 10 40 de 5c 22 f8 b1 |..0.....|A.@.\"..|
|00000650| 03 88 82 19 01 ff 63 88 | 29 81 40 00 63 88 8a 0e |......c.|).@.c...|
|00000660| 21 f8 b1 02 88 29 81 41 | 00 81 42 00 21 88 5c 66 |!....).A|..B.!.\f|
|00000670| 0e 1c 3d 83 53 01 81 43 | 00 c3 21 88 81 44 00 81 |..=.S..C|..!..D..|
|00000680| 45 00 21 2e 07 87 22 20 | 5b 6b 65 79 73 20 61 72 |E.!..." |[keys ar|
|00000690| 72 61 79 70 20 6b 65 79 | 2d 62 69 6e 64 69 6e 67 |rayp key|-binding|
|000006a0| 20 6e 69 6c 20 6d 61 63 | 20 63 6d 64 20 73 74 6f | nil mac| cmd sto|
|000006b0| 72 65 2d 68 6f 6f 6b 20 | 63 61 6c 6c 2d 6c 61 73 |re-hook |call-las|
|000006c0| 74 2d 6b 62 64 2d 6d 61 | 63 72 6f 20 28 22 0d 22 |t-kbd-ma|cro ("."|
|000006d0| 20 5b 72 65 74 75 72 6e | 5d 29 20 6c 61 73 74 2d | [return|]) last-|
|000006e0| 6b 62 64 2d 6d 61 63 72 | 6f 20 79 2d 6f 72 2d 6e |kbd-macr|o y-or-n|
|000006f0| 2d 70 20 22 4e 6f 20 6b | 65 79 62 6f 61 72 64 20 |-p "No k|eyboard |
|00000700| 6d 61 63 72 6f 20 64 65 | 66 69 6e 65 64 2e 20 20 |macro de|fined.  |
|00000710| 43 72 65 61 74 65 20 6f | 6e 65 3f 20 22 20 6b 65 |Create o|ne? " ke|
|00000720| 79 62 6f 61 72 64 2d 71 | 75 69 74 20 22 22 20 65 |yboard-q|uit "" e|
|00000730| 78 65 63 75 74 65 2d 65 | 78 74 65 6e 64 65 64 2d |xecute-e|xtended-|
|00000740| 63 6f 6d 6d 61 6e 64 20 | 72 65 61 64 2d 63 6f 6d |command |read-com|
|00000750| 6d 61 6e 64 20 22 4e 61 | 6d 65 20 6f 66 20 6b 65 |mand "Na|me of ke|
|00000760| 79 62 6f 61 72 64 20 6d | 61 63 72 6f 20 74 6f 20 |yboard m|acro to |
|00000770| 65 64 69 74 3a 20 22 20 | 65 72 72 6f 72 20 22 4e |edit: " |error "N|
|00000780| 6f 20 63 6f 6d 6d 61 6e | 64 20 6e 61 6d 65 20 67 |o comman|d name g|
|00000790| 69 76 65 6e 22 20 76 69 | 65 77 2d 6c 6f 73 73 61 |iven" vi|ew-lossa|
|000007a0| 67 65 20 72 65 63 65 6e | 74 2d 6b 65 79 73 20 22 |ge recen|t-keys "|
|000007b0| 4b 65 79 20 73 65 71 75 | 65 6e 63 65 20 25 73 20 |Key sequ|ence %s |
|000007c0| 69 73 20 6e 6f 74 20 64 | 65 66 69 6e 65 64 22 20 |is not d|efined" |
|000007d0| 6b 65 79 2d 64 65 73 63 | 72 69 70 74 69 6f 6e 20 |key-desc|ription |
|000007e0| 22 4b 65 79 20 73 65 71 | 75 65 6e 63 65 20 25 73 |"Key seq|uence %s|
|000007f0| 20 69 73 20 6e 6f 74 20 | 61 20 6b 65 79 62 6f 61 | is not |a keyboa|
|00000800| 72 64 20 6d 61 63 72 6f | 22 20 6d 65 73 73 61 67 |rd macro|" messag|
|00000810| 65 20 22 46 6f 72 6d 61 | 74 74 69 6e 67 20 6b 65 |e "Forma|tting ke|
|00000820| 79 62 6f 61 72 64 20 6d | 61 63 72 6f 2e 2e 2e 22 |yboard m|acro..."|
|00000830| 20 6f 6c 64 62 75 66 20 | 65 64 6d 61 63 72 6f 2d | oldbuf |edmacro-|
|00000840| 66 69 78 2d 6d 65 6e 75 | 2d 63 6f 6d 6d 61 6e 64 |fix-menu|-command|
|00000850| 73 20 6d 6d 61 63 20 65 | 64 6d 61 63 72 6f 2d 66 |s mmac e|dmacro-f|
|00000860| 6f 72 6d 61 74 2d 6b 65 | 79 73 20 31 20 66 6d 74 |ormat-ke|ys 1 fmt|
|00000870| 20 70 72 65 66 69 78 20 | 66 6d 74 76 20 67 65 74 | prefix |fmtv get|
|00000880| 2d 62 75 66 66 65 72 2d | 63 72 65 61 74 65 20 22 |-buffer-|create "|
|00000890| 2a 45 64 69 74 20 4d 61 | 63 72 6f 2a 22 20 62 75 |*Edit Ma|cro*" bu|
|000008a0| 66 20 22 46 6f 72 6d 61 | 74 74 69 6e 67 20 6b 65 |f "Forma|tting ke|
|000008b0| 79 62 6f 61 72 64 20 6d | 61 63 72 6f 2e 2e 2e 64 |yboard m|acro...d|
|000008c0| 6f 6e 65 22 20 73 77 69 | 74 63 68 2d 74 6f 2d 62 |one" swi|tch-to-b|
|000008d0| 75 66 66 65 72 20 6b 69 | 6c 6c 2d 61 6c 6c 2d 6c |uffer ki|ll-all-l|
|000008e0| 6f 63 61 6c 2d 76 61 72 | 69 61 62 6c 65 73 20 75 |ocal-var|iables u|
|000008f0| 73 65 2d 6c 6f 63 61 6c | 2d 6d 61 70 20 65 64 6d |se-local|-map edm|
|00000900| 61 63 72 6f 2d 6d 6f 64 | 65 2d 6d 61 70 20 62 75 |acro-mod|e-map bu|
|00000910| 66 66 65 72 2d 72 65 61 | 64 2d 6f 6e 6c 79 20 65 |ffer-rea|d-only e|
|00000920| 64 6d 61 63 72 6f 2d 6d | 6f 64 65 20 6d 61 6a 6f |dmacro-m|ode majo|
|00000930| 72 2d 6d 6f 64 65 20 22 | 45 64 69 74 20 4d 61 63 |r-mode "|Edit Mac|
|00000940| 72 6f 22 20 6d 6f 64 65 | 2d 6e 61 6d 65 20 6d 61 |ro" mode|-name ma|
|00000950| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|00000960| 65 20 65 64 6d 61 63 72 | 6f 2d 6f 72 69 67 69 6e |e edmacr|o-origin|
|00000970| 61 6c 2d 62 75 66 66 65 | 72 20 65 64 6d 61 63 72 |al-buffe|r edmacr|
|00000980| 6f 2d 66 69 6e 69 73 68 | 2d 68 6f 6f 6b 20 66 69 |o-finish|-hook fi|
|00000990| 6e 69 73 68 2d 68 6f 6f | 6b 20 65 64 6d 61 63 72 |nish-hoo|k edmacr|
|000009a0| 6f 2d 73 74 6f 72 65 2d | 68 6f 6f 6b 20 65 72 61 |o-store-|hook era|
|000009b0| 73 65 2d 62 75 66 66 65 | 72 20 22 3b 3b 20 4b 65 |se-buffe|r ";; Ke|
|000009c0| 79 62 6f 61 72 64 20 4d | 61 63 72 6f 20 45 64 69 |yboard M|acro Edi|
|000009d0| 74 6f 72 2e 20 20 50 72 | 65 73 73 20 43 2d 63 20 |tor.  Pr|ess C-c |
|000009e0| 43 2d 63 20 74 6f 20 66 | 69 6e 69 73 68 3b 20 22 |C-c to f|inish; "|
|000009f0| 20 22 70 72 65 73 73 20 | 43 2d 78 20 6b 20 52 45 | "press |C-x k RE|
|00000a00| 54 20 74 6f 20 63 61 6e | 63 65 6c 2e 5c 6e 22 20 |T to can|cel.\n" |
|00000a10| 22 3b 3b 20 4f 72 69 67 | 69 6e 61 6c 20 6b 65 79 |";; Orig|inal key|
|00000a20| 73 3a 20 22 20 22 5c 6e | 22 20 22 5c 6e 43 6f 6d |s: " "\n|" "\nCom|
|00000a30| 6d 61 6e 64 3a 20 22 20 | 73 79 6d 62 6f 6c 2d 6e |mand: " |symbol-n|
|00000a40| 61 6d 65 20 22 6e 6f 6e | 65 22 20 77 68 65 72 65 |ame "non|e" where|
|00000a50| 2d 69 73 2d 69 6e 74 65 | 72 6e 61 6c 20 28 6b 65 |-is-inte|rnal (ke|
|00000a60| 79 6d 61 70 29 20 22 4b | 65 79 3a 20 22 20 22 4b |ymap) "K|ey: " "K|
|00000a70| 65 79 3a 20 6e 6f 6e 65 | 5c 6e 22 20 22 5c 6e 4d |ey: none|\n" "\nM|
|00000a80| 61 63 72 6f 3a 5c 6e 5c | 6e 22 20 72 65 63 65 6e |acro:\n\|n" recen|
|00000a90| 74 65 72 20 28 34 29 20 | 73 65 74 2d 62 75 66 66 |ter (4) |set-buff|
|00000aa0| 65 72 2d 6d 6f 64 69 66 | 69 65 64 2d 70 20 72 75 |er-modif|ied-p ru|
|00000ab0| 6e 2d 68 6f 6f 6b 73 20 | 65 64 6d 61 63 72 6f 2d |n-hooks |edmacro-|
|00000ac0| 66 6f 72 6d 61 74 2d 68 | 6f 6f 6b 5d 20 35 20 28 |format-h|ook] 5 (|
|00000ad0| 23 24 20 2e 20 39 30 39 | 29 20 22 6b 4b 65 79 62 |#$ . 909|) "kKeyb|
|00000ae0| 6f 61 72 64 20 6d 61 63 | 72 6f 20 74 6f 20 65 64 |oard mac|ro to ed|
|00000af0| 69 74 20 28 43 2d 78 20 | 65 2c 20 4d 2d 78 2c 20 |it (C-x |e, M-x, |
|00000b00| 43 2d 68 20 6c 2c 20 6f | 72 20 6b 65 79 73 29 3a |C-h l, o|r keys):|
|00000b10| 20 5c 6e 50 22 5d 29 0a | 23 40 34 38 20 45 64 69 | \nP"]).|#@48 Edi|
|00000b20| 74 20 74 68 65 20 6d 6f | 73 74 20 72 65 63 65 6e |t the mo|st recen|
|00000b30| 74 6c 79 20 64 65 66 69 | 6e 65 64 20 6b 65 79 62 |tly defi|ned keyb|
|00000b40| 6f 61 72 64 20 6d 61 63 | 72 6f 2e 1f 0a 28 64 65 |oard mac|ro...(de|
|00000b50| 66 61 6c 69 61 73 20 27 | 65 64 69 74 2d 6c 61 73 |falias '|edit-las|
|00000b60| 74 2d 6b 62 64 2d 6d 61 | 63 72 6f 20 23 5b 28 26 |t-kbd-ma|cro #[(&|
|00000b70| 6f 70 74 69 6f 6e 61 6c | 20 70 72 65 66 69 78 29 |optional| prefix)|
|00000b80| 20 22 c0 c1 5c 6e 5c 22 | 87 22 20 5b 65 64 69 74 | "..\n\"|." [edit|
|00000b90| 2d 6b 62 64 2d 6d 61 63 | 72 6f 20 63 61 6c 6c 2d |-kbd-mac|ro call-|
|00000ba0| 6c 61 73 74 2d 6b 62 64 | 2d 6d 61 63 72 6f 20 70 |last-kbd|-macro p|
|00000bb0| 72 65 66 69 78 5d 20 33 | 20 28 23 24 20 2e 20 32 |refix] 3| (#$ . 2|
|00000bc0| 38 34 35 29 20 22 50 22 | 5d 29 0a 23 40 37 37 20 |845) "P"|]).#@77 |
|00000bd0| 45 64 69 74 20 61 20 6b | 65 79 62 6f 61 72 64 20 |Edit a k|eyboard |
|00000be0| 6d 61 63 72 6f 20 77 68 | 69 63 68 20 68 61 73 20 |macro wh|ich has |
|00000bf0| 62 65 65 6e 20 67 69 76 | 65 6e 20 61 20 6e 61 6d |been giv|en a nam|
|00000c00| 65 20 62 79 20 60 6e 61 | 6d 65 2d 6c 61 73 74 2d |e by `na|me-last-|
|00000c10| 6b 62 64 2d 6d 61 63 72 | 6f 27 2e 1f 0a 28 64 65 |kbd-macr|o'...(de|
|00000c20| 66 61 6c 69 61 73 20 27 | 65 64 69 74 2d 6e 61 6d |falias '|edit-nam|
|00000c30| 65 64 2d 6b 62 64 2d 6d | 61 63 72 6f 20 23 5b 28 |ed-kbd-m|acro #[(|
|00000c40| 26 6f 70 74 69 6f 6e 61 | 6c 20 70 72 65 66 69 78 |&optiona|l prefix|
|00000c50| 29 20 22 c0 c1 5c 6e 5c | 22 87 22 20 5b 65 64 69 |) "..\n\|"." [edi|
|00000c60| 74 2d 6b 62 64 2d 6d 61 | 63 72 6f 20 65 78 65 63 |t-kbd-ma|cro exec|
|00000c70| 75 74 65 2d 65 78 74 65 | 6e 64 65 64 2d 63 6f 6d |ute-exte|nded-com|
|00000c80| 6d 61 6e 64 20 70 72 65 | 66 69 78 5d 20 33 20 28 |mand pre|fix] 3 (|
|00000c90| 23 24 20 2e 20 33 30 32 | 34 29 20 22 50 22 5d 29 |#$ . 302|4) "P"])|
|00000ca0| 0a 23 40 35 39 35 20 52 | 65 61 64 20 74 68 65 20 |.#@595 R|ead the |
|00000cb0| 72 65 67 69 6f 6e 20 61 | 73 20 61 20 6b 65 79 62 |region a|s a keyb|
|00000cc0| 6f 61 72 64 20 6d 61 63 | 72 6f 20 64 65 66 69 6e |oard mac|ro defin|
|00000cd0| 69 74 69 6f 6e 2e 0a 54 | 68 65 20 72 65 67 69 6f |ition..T|he regio|
|00000ce0| 6e 20 69 73 20 69 6e 74 | 65 72 70 72 65 74 65 64 |n is int|erpreted|
|00000cf0| 20 61 73 20 73 70 65 6c | 6c 65 64 2d 6f 75 74 20 | as spel|led-out |
|00000d00| 6b 65 79 73 74 72 6f 6b | 65 73 2c 20 65 2e 67 2e |keystrok|es, e.g.|
|00000d10| 2c 20 22 4d 2d 78 20 61 | 62 63 20 52 45 54 22 2e |, "M-x a|bc RET".|
|00000d20| 0a 53 65 65 20 64 6f 63 | 75 6d 65 6e 74 61 74 69 |.See doc|umentati|
|00000d30| 6f 6e 20 66 6f 72 20 60 | 65 64 6d 61 63 72 6f 2d |on for `|edmacro-|
|00000d40| 6d 6f 64 65 27 20 66 6f | 72 20 64 65 74 61 69 6c |mode' fo|r detail|
|00000d50| 73 2e 0a 4c 65 61 64 69 | 6e 67 2f 74 72 61 69 6c |s..Leadi|ng/trail|
|00000d60| 69 6e 67 20 22 43 2d 78 | 20 28 22 20 61 6e 64 20 |ing "C-x| (" and |
|00000d70| 22 43 2d 78 20 29 22 20 | 69 6e 20 74 68 65 20 74 |"C-x )" |in the t|
|00000d80| 65 78 74 20 61 72 65 20 | 61 6c 6c 6f 77 65 64 20 |ext are |allowed |
|00000d90| 61 6e 64 20 69 67 6e 6f | 72 65 64 2e 0a 54 68 65 |and igno|red..The|
|00000da0| 20 72 65 73 75 6c 74 69 | 6e 67 20 6d 61 63 72 6f | resulti|ng macro|
|00000db0| 20 69 73 20 69 6e 73 74 | 61 6c 6c 65 64 20 61 73 | is inst|alled as|
|00000dc0| 20 74 68 65 20 22 63 75 | 72 72 65 6e 74 22 20 6b | the "cu|rrent" k|
|00000dd0| 65 79 62 6f 61 72 64 20 | 6d 61 63 72 6f 2e 0a 0a |eyboard |macro...|
|00000de0| 49 6e 20 4c 69 73 70 2c | 20 6d 61 79 20 61 6c 73 |In Lisp,| may als|
|00000df0| 6f 20 62 65 20 63 61 6c | 6c 65 64 20 77 69 74 68 |o be cal|led with|
|00000e00| 20 61 20 73 69 6e 67 6c | 65 20 53 54 52 49 4e 47 | a singl|e STRING|
|00000e10| 20 61 72 67 75 6d 65 6e | 74 20 69 6e 20 77 68 69 | argumen|t in whi|
|00000e20| 63 68 20 63 61 73 65 0a | 74 68 65 20 72 65 73 75 |ch case.|the resu|
|00000e30| 6c 74 20 69 73 20 72 65 | 74 75 72 6e 65 64 20 72 |lt is re|turned r|
|00000e40| 61 74 68 65 72 20 74 68 | 61 6e 20 62 65 69 6e 67 |ather th|an being|
|00000e50| 20 69 6e 73 74 61 6c 6c | 65 64 20 61 73 20 74 68 | install|ed as th|
|00000e60| 65 20 63 75 72 72 65 6e | 74 20 6d 61 63 72 6f 2e |e curren|t macro.|
|00000e70| 0a 54 68 65 20 72 65 73 | 75 6c 74 20 77 69 6c 6c |.The res|ult will|
|00000e80| 20 62 65 20 61 20 73 74 | 72 69 6e 67 20 69 66 20 | be a st|ring if |
|00000e90| 70 6f 73 73 69 62 6c 65 | 2c 20 6f 74 68 65 72 77 |possible|, otherw|
|00000ea0| 69 73 65 20 61 6e 20 65 | 76 65 6e 74 20 76 65 63 |ise an e|vent vec|
|00000eb0| 74 6f 72 2e 0a 53 65 63 | 6f 6e 64 20 61 72 67 75 |tor..Sec|ond argu|
|00000ec0| 6d 65 6e 74 20 4e 45 45 | 44 2d 56 45 43 54 4f 52 |ment NEE|D-VECTOR|
|00000ed0| 20 6d 65 61 6e 73 20 74 | 6f 20 72 65 74 75 72 6e | means t|o return|
|00000ee0| 20 61 6e 20 65 76 65 6e | 74 20 76 65 63 74 6f 72 | an even|t vector|
|00000ef0| 20 61 6c 77 61 79 73 2e | 1f 0a 28 64 65 66 61 6c | always.|..(defal|
|00000f00| 69 61 73 20 27 72 65 61 | 64 2d 6b 62 64 2d 6d 61 |ias 'rea|d-kbd-ma|
|00000f10| 63 72 6f 20 23 5b 28 73 | 74 61 72 74 20 26 6f 70 |cro #[(s|tart &op|
|00000f20| 74 69 6f 6e 61 6c 20 65 | 6e 64 29 20 22 08 3b 83 |tional e|nd) ".;.|
|00000f30| 5c 6e 00 c1 08 5c 6e 5c | 22 87 c1 08 5c 6e 7b 21 |\n...\n\|"...\n{!|
|00000f40| 89 13 87 22 20 5b 73 74 | 61 72 74 20 65 64 6d 61 |..." [st|art edma|
|00000f50| 63 72 6f 2d 70 61 72 73 | 65 2d 6b 65 79 73 20 65 |cro-pars|e-keys e|
|00000f60| 6e 64 20 6c 61 73 74 2d | 6b 62 64 2d 6d 61 63 72 |nd last-|kbd-macr|
|00000f70| 6f 5d 20 33 20 28 23 24 | 20 2e 20 33 32 33 39 29 |o] 3 (#$| . 3239)|
|00000f80| 20 22 72 22 5d 29 0a 23 | 40 33 30 31 20 52 65 74 | "r"]).#|@301 Ret|
|00000f90| 75 72 6e 20 74 68 65 20 | 6b 65 79 62 6f 61 72 64 |urn the |keyboard|
|00000fa0| 20 6d 61 63 72 6f 20 4d | 41 43 52 4f 20 61 73 20 | macro M|ACRO as |
|00000fb0| 61 20 68 75 6d 61 6e 2d | 72 65 61 64 61 62 6c 65 |a human-|readable|
|00000fc0| 20 73 74 72 69 6e 67 2e | 0a 54 68 69 73 20 73 74 | string.|.This st|
|00000fd0| 72 69 6e 67 20 69 73 20 | 73 75 69 74 61 62 6c 65 |ring is |suitable|
|00000fe0| 20 66 6f 72 20 70 61 73 | 73 69 6e 67 20 74 6f 20 | for pas|sing to |
|00000ff0| 60 72 65 61 64 2d 6b 62 | 64 2d 6d 61 63 72 6f 27 |`read-kb|d-macro'|
|00001000| 2e 0a 53 65 63 6f 6e 64 | 20 61 72 67 75 6d 65 6e |..Second| argumen|
|00001010| 74 20 56 45 52 42 4f 53 | 45 20 6d 65 61 6e 73 20 |t VERBOS|E means |
|00001020| 74 6f 20 70 75 74 20 6f | 6e 65 20 63 6f 6d 6d 61 |to put o|ne comma|
|00001030| 6e 64 20 70 65 72 20 6c | 69 6e 65 20 77 69 74 68 |nd per l|ine with|
|00001040| 20 63 6f 6d 6d 65 6e 74 | 73 2e 0a 49 66 20 56 45 | comment|s..If VE|
|00001050| 52 42 4f 53 45 20 69 73 | 20 60 31 27 2c 20 70 75 |RBOSE is| `1', pu|
|00001060| 74 20 65 76 65 72 79 74 | 68 69 6e 67 20 6f 6e 20 |t everyt|hing on |
|00001070| 6f 6e 65 20 6c 69 6e 65 | 2e 20 20 49 66 20 56 45 |one line|.  If VE|
|00001080| 52 42 4f 53 45 20 69 73 | 20 6f 6d 69 74 74 65 64 |RBOSE is| omitted|
|00001090| 0a 6f 72 20 6e 69 6c 2c | 20 75 73 65 20 61 20 63 |.or nil,| use a c|
|000010a0| 6f 6d 70 61 63 74 20 38 | 30 2d 63 6f 6c 75 6d 6e |ompact 8|0-column|
|000010b0| 20 66 6f 72 6d 61 74 2e | 1f 0a 28 64 65 66 61 6c | format.|..(defal|
|000010c0| 69 61 73 20 27 66 6f 72 | 6d 61 74 2d 6b 62 64 2d |ias 'for|mat-kbd-|
|000010d0| 6d 61 63 72 6f 20 23 5b | 28 26 6f 70 74 69 6f 6e |macro #[|(&option|
|000010e0| 61 6c 20 6d 61 63 72 6f | 20 76 65 72 62 6f 73 65 |al macro| verbose|
|000010f0| 29 20 22 08 83 5c 66 00 | 08 39 83 5c 66 00 08 4b |) "..\f.|.9.\f..K|
|00001100| 10 c1 08 86 12 00 5c 6e | 0b 5c 22 87 22 20 5b 6d |......\n|.\"." [m|
|00001110| 61 63 72 6f 20 65 64 6d | 61 63 72 6f 2d 66 6f 72 |acro edm|acro-for|
|00001120| 6d 61 74 2d 6b 65 79 73 | 20 6c 61 73 74 2d 6b 62 |mat-keys| last-kb|
|00001130| 64 2d 6d 61 63 72 6f 20 | 76 65 72 62 6f 73 65 5d |d-macro |verbose]|
|00001140| 20 33 20 28 23 24 20 2e | 20 33 39 38 31 29 5d 29 | 3 (#$ .| 3981)])|
|00001150| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 65 64 6d 61 |.(defali|as 'edma|
|00001160| 63 72 6f 2d 66 69 6e 69 | 73 68 2d 65 64 69 74 20 |cro-fini|sh-edit |
|00001170| 23 5b 6e 69 6c 20 22 08 | c1 3d 84 5c 6e 00 c2 c3 |#[nil ".|.=.\n...|
|00001180| 21 88 c4 c5 21 88 c6 89 | 89 65 1e 07 1e 08 1e 09 |!...!...|.e......|
|00001190| 1e 5c 6e 0e 07 62 88 c6 | 1e 0b cc cd 21 84 f8 00 |.\n..b..|....!...|
|000011a0| cc ce 21 83 72 00 0e 0f | 83 36 00 c2 d0 21 88 d1 |..!.r...|.6...!..|
|000011b0| 94 d1 95 7b 89 1e 12 d3 | 9a 84 6e 00 0e 12 d4 9a |...{....|..n.....|
|000011c0| 3f 85 4f 00 d5 0e 12 21 | 16 5c 6e d6 0e 5c 6e 21 |?.O....!|.\n..\n!|
|000011d0| 83 6e 00 d7 0e 5c 6e 4b | 21 84 6e 00 d8 d9 da 0e |.n...\nK|!.n.....|
|000011e0| 5c 6e db 23 21 84 6e 00 | dc 20 88 29 82 f8 00 cc |\n.#!.n.|. .)....|
|000011f0| dd 21 83 e1 00 0e 0f 83 | 81 00 c2 de 21 88 df d1 |.!......|....!...|
|00001200| 94 d1 95 7b 21 89 1e 20 | d3 9a 84 dd 00 0e 20 d4 |...{!.. |...... .|
|00001210| 9a 83 9d 00 e1 16 08 82 | dd 00 0e 20 0e 09 42 16 |........|... ..B.|
|00001220| 09 e2 0e 20 21 89 1e 23 | 83 dc 00 e4 0e 23 21 83 |... !..#|.....#!.|
|00001230| dc 00 d7 0e 23 21 84 dc | 00 d6 0e 23 21 83 cb 00 |....#!..|...#!...|
|00001240| d7 0e 23 4b 21 84 dc 00 | d8 d9 e5 e6 0e 20 d1 5c |..#K!...|..... .\|
|00001250| 22 db 23 21 84 dc 00 dc | 20 88 29 29 82 f8 00 cc |".#!....| .))....|
|00001260| e7 21 83 ee 00 e8 95 62 | 88 82 fe 00 6d 84 fe 00 |.!.....b|....m...|
|00001270| c2 e9 21 83 fe 00 d1 79 | 88 82 21 00 60 16 07 29 |..!....y|..!.`..)|
|00001280| 70 1e 2a 0e 07 64 7b 1e | 12 eb 20 1e 2c 0e 2d 1e |p.*..d{.|.. .,.-.|
|00001290| 2e 0e 0f 1e 2f 0d 1e 30 | 0e 5c 6e 84 34 01 0e 09 |..../..0|.\n.4...|
|000012a0| 84 34 01 0e 2f 84 34 01 | 0e 12 d3 9a 84 34 01 c2 |.4../.4.|.....4..|
|000012b0| f1 21 88 0e 2c 83 1c 02 | f2 0e 2e 21 83 44 01 0e |.!..,...|...!.D..|
|000012c0| 2e 71 88 f3 f4 21 88 df | 0e 12 21 1e 35 f3 f6 21 |.q...!..|..!.5..!|
|000012d0| 88 0e 2f 83 60 01 0e 2f | 0e 35 21 88 82 1b 02 0e |../.`../|.5!.....|
|000012e0| 5c 6e f7 3d 83 76 01 0e | 35 47 e8 56 85 71 01 0e |\n.=.v..|5G.V.q..|
|000012f0| 35 16 37 c6 16 5c 6e 0e | 5c 6e 83 91 01 0e 35 47 |5.7..\n.|\n....5G|
|00001300| e8 55 83 8b 01 f8 0e 5c | 6e 21 88 82 91 01 0e 5c |.U.....\|n!.....\|
|00001310| 6e 0e 35 4d 88 0e 08 83 | c2 01 0e 5c 6e 83 1b 02 |n.5M....|...\n...|
|00001320| f9 0e 5c 6e fa 5c 22 1e | 3b c6 1e 20 0e 3b 3a 83 |..\n.\".|;.. .;:.|
|00001330| be 01 0e 3b 40 16 20 fc | 0e 20 21 88 0e 3b 41 89 |...;@. .|. !..;A.|
|00001340| 16 3b 82 a7 01 2a 82 1b | 02 0e 09 83 1b 02 0e 35 |.;...*..|.......5|
|00001350| 47 e8 55 83 f3 01 0e 09 | 1e 3d c6 1e 20 0e 3d 3a |G.U.....|.=.. .=:|
|00001360| 83 ef 01 0e 3d 40 16 20 | fc 0e 20 21 88 0e 3d 41 |....=@. |.. !..=A|
|00001370| 89 16 3d 82 d8 01 2a 82 | 1b 02 0e 09 1e 3e c6 1e |..=...*.|.....>..|
|00001380| 20 0e 3e 3a 83 1a 02 0e | 3e 40 16 20 ff 0e 20 0e | .>:....|>@. .. .|
|00001390| 5c 6e 86 0f 02 0e 35 5c | 22 88 0e 3e 41 89 16 3e |\n....5\|"..>A..>|
|000013a0| 82 fc 01 2a 29 81 40 00 | 0e 2a 21 88 f2 0e 2e 21 |...*).@.|.*!....!|
|000013b0| 83 31 02 81 41 00 0e 2e | 21 88 0e 30 85 39 02 0e |.1..A...|!..0.9..|
|000013c0| 30 20 2e 5c 6e 87 22 20 | 5b 6d 61 6a 6f 72 2d 6d |0 .\n." |[major-m|
|000013d0| 6f 64 65 20 65 64 6d 61 | 63 72 6f 2d 6d 6f 64 65 |ode edma|cro-mode|
|000013e0| 20 65 72 72 6f 72 20 22 | 54 68 69 73 20 63 6f 6d | error "|This com|
|000013f0| 6d 61 6e 64 20 69 73 20 | 76 61 6c 69 64 20 6f 6e |mand is |valid on|
|00001400| 6c 79 20 69 6e 20 62 75 | 66 66 65 72 73 20 63 72 |ly in bu|ffers cr|
|00001410| 65 61 74 65 64 20 62 79 | 20 60 65 64 69 74 2d 6b |eated by| `edit-k|
|00001420| 62 64 2d 6d 61 63 72 6f | 27 22 20 72 75 6e 2d 68 |bd-macro|'" run-h|
|00001430| 6f 6f 6b 73 20 65 64 6d | 61 63 72 6f 2d 66 69 6e |ooks edm|acro-fin|
|00001440| 69 73 68 2d 68 6f 6f 6b | 20 6e 69 6c 20 74 6f 70 |ish-hook| nil top|
|00001450| 20 6e 6f 2d 6b 65 79 73 | 20 6b 65 79 73 20 63 6d | no-keys| keys cm|
|00001460| 64 20 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 |d case-f|old-sear|
|00001470| 63 68 20 6c 6f 6f 6b 69 | 6e 67 2d 61 74 20 22 5b |ch looki|ng-at "[|
|00001480| 20 09 5d 2a 5c 5c 28 24 | 5c 5c 7c 3b 3b 5c 5c 7c | .]*\\($|\\|;;\\||
|00001490| 52 45 4d 5b 20 09 5c 6e | 5d 5c 5c 29 22 20 22 43 |REM[ .\n|]\\)" "C|
|000014a0| 6f 6d 6d 61 6e 64 3a 5b | 20 09 5d 2a 5c 5c 28 5b |ommand:[| .]*\\([|
|000014b0| 5e 20 09 5c 6e 5d 2a 5c | 5c 29 5b 20 09 5d 2a 24 |^ .\n]*\|\)[ .]*$|
|000014c0| 22 20 65 64 6d 61 63 72 | 6f 2d 73 74 6f 72 65 2d |" edmacr|o-store-|
|000014d0| 68 6f 6f 6b 20 22 5c 22 | 43 6f 6d 6d 61 6e 64 5c |hook "\"|Command\|
|000014e0| 22 20 6c 69 6e 65 20 6e | 6f 74 20 61 6c 6c 6f 77 |" line n|ot allow|
|000014f0| 65 64 20 69 6e 20 74 68 | 69 73 20 63 6f 6e 74 65 |ed in th|is conte|
|00001500| 78 74 22 20 31 20 73 74 | 72 20 22 22 20 22 6e 6f |xt" 1 st|r "" "no|
|00001510| 6e 65 22 20 69 6e 74 65 | 72 6e 20 66 62 6f 75 6e |ne" inte|rn fboun|
|00001520| 64 70 20 61 72 72 61 79 | 70 20 79 2d 6f 72 2d 6e |dp array|p y-or-n|
|00001530| 2d 70 20 66 6f 72 6d 61 | 74 20 22 43 6f 6d 6d 61 |-p forma|t "Comma|
|00001540| 6e 64 20 25 73 20 69 73 | 20 61 6c 72 65 61 64 79 |nd %s is| already|
|00001550| 20 64 65 66 69 6e 65 64 | 3b 20 25 73 22 20 22 70 | defined|; %s" "p|
|00001560| 72 6f 63 65 65 64 3f 20 | 22 20 6b 65 79 62 6f 61 |roceed? |" keyboa|
|00001570| 72 64 2d 71 75 69 74 20 | 22 4b 65 79 3a 5c 5c 28 |rd-quit |"Key:\\(|
|00001580| 2e 2a 5c 5c 29 24 22 20 | 22 5c 22 4b 65 79 5c 22 |.*\\)$" |"\"Key\"|
|00001590| 20 6c 69 6e 65 20 6e 6f | 74 20 61 6c 6c 6f 77 65 | line no|t allowe|
|000015a0| 64 20 69 6e 20 74 68 69 | 73 20 63 6f 6e 74 65 78 |d in thi|s contex|
|000015b0| 74 22 20 65 64 6d 61 63 | 72 6f 2d 70 61 72 73 65 |t" edmac|ro-parse|
|000015c0| 2d 6b 65 79 73 20 6b 65 | 79 20 74 20 6b 65 79 2d |-keys ke|y t key-|
|000015d0| 62 69 6e 64 69 6e 67 20 | 62 20 63 6f 6d 6d 61 6e |binding |b comman|
|000015e0| 64 70 20 22 4b 65 79 20 | 25 73 20 69 73 20 61 6c |dp "Key |%s is al|
|000015f0| 72 65 61 64 79 20 64 65 | 66 69 6e 65 64 3b 20 25 |ready de|fined; %|
|00001600| 73 22 20 65 64 6d 61 63 | 72 6f 2d 66 6f 72 6d 61 |s" edmac|ro-forma|
|00001610| 74 2d 6b 65 79 73 20 22 | 4d 61 63 72 6f 3a 5b 20 |t-keys "|Macro:[ |
|00001620| 09 5c 6e 5d 2a 22 20 30 | 20 22 45 78 70 65 63 74 |.\n]*" 0| "Expect|
|00001630| 65 64 20 61 20 60 4d 61 | 63 72 6f 3a 27 20 6c 69 |ed a `Ma|cro:' li|
|00001640| 6e 65 22 20 62 75 66 20 | 62 75 66 66 65 72 2d 6d |ne" buf |buffer-m|
|00001650| 6f 64 69 66 69 65 64 2d | 70 20 6d 6f 64 70 20 65 |odified-|p modp e|
|00001660| 64 6d 61 63 72 6f 2d 6f | 72 69 67 69 6e 61 6c 2d |dmacro-o|riginal-|
|00001670| 62 75 66 66 65 72 20 6f | 62 75 66 20 73 74 6f 72 |buffer o|buf stor|
|00001680| 65 2d 68 6f 6f 6b 20 66 | 69 6e 69 73 68 2d 68 6f |e-hook f|inish-ho|
|00001690| 6f 6b 20 22 4e 6f 20 63 | 6f 6d 6d 61 6e 64 20 6e |ok "No c|ommand n|
|000016a0| 61 6d 65 20 6f 72 20 6b | 65 79 73 20 73 70 65 63 |ame or k|eys spec|
|000016b0| 69 66 69 65 64 22 20 62 | 75 66 66 65 72 2d 6e 61 |ified" b|uffer-na|
|000016c0| 6d 65 20 6d 65 73 73 61 | 67 65 20 22 43 6f 6d 70 |me messa|ge "Comp|
|000016d0| 69 6c 69 6e 67 20 6b 65 | 79 62 6f 61 72 64 20 6d |iling ke|yboard m|
|000016e0| 61 63 72 6f 2e 2e 2e 22 | 20 6d 61 63 20 22 43 6f |acro..."| mac "Co|
|000016f0| 6d 70 69 6c 69 6e 67 20 | 6b 65 79 62 6f 61 72 64 |mpiling |keyboard|
|00001700| 20 6d 61 63 72 6f 2e 2e | 2e 64 6f 6e 65 22 20 6c | macro..|.done" l|
|00001710| 61 73 74 2d 6b 62 64 2d | 6d 61 63 72 6f 20 66 6d |ast-kbd-|macro fm|
|00001720| 61 6b 75 6e 62 6f 75 6e | 64 20 77 68 65 72 65 2d |akunboun|d where-|
|00001730| 69 73 2d 69 6e 74 65 72 | 6e 61 6c 20 28 6b 65 79 |is-inter|nal (key|
|00001740| 6d 61 70 29 20 47 35 32 | 33 30 30 20 67 6c 6f 62 |map) G52|300 glob|
|00001750| 61 6c 2d 75 6e 73 65 74 | 2d 6b 65 79 20 47 35 32 |al-unset|-key G52|
|00001760| 33 30 31 20 47 35 32 33 | 30 32 20 67 6c 6f 62 61 |301 G523|02 globa|
|00001770| 6c 2d 73 65 74 2d 6b 65 | 79 20 6b 69 6c 6c 2d 62 |l-set-ke|y kill-b|
|00001780| 75 66 66 65 72 20 73 77 | 69 74 63 68 2d 74 6f 2d |uffer sw|itch-to-|
|00001790| 62 75 66 66 65 72 5d 20 | 37 20 6e 69 6c 20 6e 69 |buffer] |7 nil ni|
|000017a0| 6c 5d 29 0a 23 40 34 39 | 20 49 6e 73 65 72 74 20 |l]).#@49| Insert |
|000017b0| 74 68 65 20 77 72 69 74 | 74 65 6e 20 6e 61 6d 65 |the writ|ten name|
|000017c0| 20 6f 66 20 61 20 6b 65 | 79 20 69 6e 20 74 68 65 | of a ke|y in the|
|000017d0| 20 62 75 66 66 65 72 2e | 1f 0a 28 64 65 66 61 6c | buffer.|..(defal|
|000017e0| 69 61 73 20 27 65 64 6d | 61 63 72 6f 2d 69 6e 73 |ias 'edm|acro-ins|
|000017f0| 65 72 74 2d 6b 65 79 20 | 23 5b 28 6b 65 79 29 20 |ert-key |#[(key) |
|00001800| 22 6e 83 5c 66 00 c0 09 | c2 5c 22 c3 b1 02 87 c0 |"n.\f...|.\".....|
|00001810| 09 21 c4 b1 02 87 22 20 | 5b 65 64 6d 61 63 72 6f |.!...." |[edmacro|
|00001820| 2d 66 6f 72 6d 61 74 2d | 6b 65 79 73 20 6b 65 79 |-format-|keys key|
|00001830| 20 74 20 22 5c 6e 22 20 | 22 20 22 5d 20 33 20 28 | t "\n" |" "] 3 (|
|00001840| 23 24 20 2e 20 36 30 35 | 37 29 20 22 6b 4b 65 79 |#$ . 605|7) "kKey|
|00001850| 20 74 6f 20 69 6e 73 65 | 72 74 3a 20 22 5d 29 0a | to inse|rt: "]).|
|00001860| 23 40 33 30 39 31 20 5c | 3c 65 64 6d 61 63 72 6f |#@3091 \|<edmacro|
|00001870| 2d 6d 6f 64 65 2d 6d 61 | 70 3e 4b 65 79 62 6f 61 |-mode-ma|p>Keyboa|
|00001880| 72 64 20 4d 61 63 72 6f | 20 45 64 69 74 69 6e 67 |rd Macro| Editing|
|00001890| 20 6d 6f 64 65 2e 20 20 | 50 72 65 73 73 0a 5c 5b | mode.  |Press.\[|
|000018a0| 65 64 6d 61 63 72 6f 2d | 66 69 6e 69 73 68 2d 65 |edmacro-|finish-e|
|000018b0| 64 69 74 5d 20 74 6f 20 | 73 61 76 65 20 61 6e 64 |dit] to |save and|
|000018c0| 20 65 78 69 74 2e 0a 54 | 6f 20 61 62 6f 72 74 20 | exit..T|o abort |
|000018d0| 74 68 65 20 65 64 69 74 | 2c 20 6a 75 73 74 20 6b |the edit|, just k|
|000018e0| 69 6c 6c 20 74 68 69 73 | 20 62 75 66 66 65 72 20 |ill this| buffer |
|000018f0| 77 69 74 68 20 5c 5b 6b | 69 6c 6c 2d 62 75 66 66 |with \[k|ill-buff|
|00001900| 65 72 5d 20 52 45 54 2e | 0a 0a 50 72 65 73 73 20 |er] RET.|..Press |
|00001910| 5c 5b 65 64 6d 61 63 72 | 6f 2d 69 6e 73 65 72 74 |\[edmacr|o-insert|
|00001920| 2d 6b 65 79 5d 20 74 6f | 20 69 6e 73 65 72 74 20 |-key] to| insert |
|00001930| 74 68 65 20 6e 61 6d 65 | 20 6f 66 20 61 6e 79 20 |the name| of any |
|00001940| 6b 65 79 20 62 79 20 74 | 79 70 69 6e 67 20 74 68 |key by t|yping th|
|00001950| 65 20 6b 65 79 2e 0a 0a | 54 68 65 20 65 64 69 74 |e key...|The edit|
|00001960| 69 6e 67 20 62 75 66 66 | 65 72 20 63 6f 6e 74 61 |ing buff|er conta|
|00001970| 69 6e 73 20 61 20 22 43 | 6f 6d 6d 61 6e 64 3a 22 |ins a "C|ommand:"|
|00001980| 20 6c 69 6e 65 20 61 6e | 64 20 61 6e 79 20 6e 75 | line an|d any nu|
|00001990| 6d 62 65 72 20 6f 66 0a | 22 4b 65 79 3a 22 20 6c |mber of.|"Key:" l|
|000019a0| 69 6e 65 73 20 61 74 20 | 74 68 65 20 74 6f 70 2e |ines at |the top.|
|000019b0| 20 20 54 68 65 73 65 20 | 61 72 65 20 66 6f 6c 6c |  These |are foll|
|000019c0| 6f 77 65 64 20 62 79 20 | 61 20 22 4d 61 63 72 6f |owed by |a "Macro|
|000019d0| 3a 22 20 6c 69 6e 65 0a | 61 6e 64 20 74 68 65 20 |:" line.|and the |
|000019e0| 6d 61 63 72 6f 20 69 74 | 73 65 6c 66 20 61 73 20 |macro it|self as |
|000019f0| 73 70 65 6c 6c 65 64 2d | 6f 75 74 20 6b 65 79 73 |spelled-|out keys|
|00001a00| 74 72 6f 6b 65 73 3a 20 | 60 43 2d 78 20 43 2d 66 |trokes: |`C-x C-f|
|00001a10| 20 66 6f 6f 20 52 45 54 | 27 2e 0a 0a 54 68 65 20 | foo RET|'...The |
|00001a20| 22 43 6f 6d 6d 61 6e 64 | 3a 22 20 6c 69 6e 65 20 |"Command|:" line |
|00001a30| 73 70 65 63 69 66 69 65 | 73 20 74 68 65 20 63 6f |specifie|s the co|
|00001a40| 6d 6d 61 6e 64 20 6e 61 | 6d 65 20 74 6f 20 77 68 |mmand na|me to wh|
|00001a50| 69 63 68 20 74 68 65 20 | 6d 61 63 72 6f 0a 69 73 |ich the |macro.is|
|00001a60| 20 62 6f 75 6e 64 2c 20 | 6f 72 20 22 6e 6f 6e 65 | bound, |or "none|
|00001a70| 22 20 66 6f 72 20 6e 6f | 20 63 6f 6d 6d 61 6e 64 |" for no| command|
|00001a80| 20 6e 61 6d 65 2e 20 20 | 57 72 69 74 65 20 22 6c | name.  |Write "l|
|00001a90| 61 73 74 2d 6b 62 64 2d | 6d 61 63 72 6f 22 0a 74 |ast-kbd-|macro".t|
|00001aa0| 6f 20 72 65 66 65 72 20 | 74 6f 20 74 68 65 20 63 |o refer |to the c|
|00001ab0| 75 72 72 65 6e 74 20 6b | 65 79 62 6f 61 72 64 20 |urrent k|eyboard |
|00001ac0| 6d 61 63 72 6f 20 28 61 | 73 20 75 73 65 64 20 62 |macro (a|s used b|
|00001ad0| 79 20 5c 5b 63 61 6c 6c | 2d 6c 61 73 74 2d 6b 62 |y \[call|-last-kb|
|00001ae0| 64 2d 6d 61 63 72 6f 5d | 29 2e 0a 0a 54 68 65 20 |d-macro]|)...The |
|00001af0| 22 4b 65 79 3a 22 20 6c | 69 6e 65 73 20 73 70 65 |"Key:" l|ines spe|
|00001b00| 63 69 66 79 20 6b 65 79 | 20 73 65 71 75 65 6e 63 |cify key| sequenc|
|00001b10| 65 73 20 74 6f 20 77 68 | 69 63 68 20 74 68 65 20 |es to wh|ich the |
|00001b20| 6d 61 63 72 6f 20 69 73 | 20 62 6f 75 6e 64 2c 0a |macro is| bound,.|
|00001b30| 6f 72 20 22 6e 6f 6e 65 | 22 20 66 6f 72 20 6e 6f |or "none|" for no|
|00001b40| 20 6b 65 79 20 62 69 6e | 64 69 6e 67 73 2e 0a 0a | key bin|dings...|
|00001b50| 59 6f 75 20 63 61 6e 20 | 65 64 69 74 20 74 68 65 |You can |edit the|
|00001b60| 73 65 20 6c 69 6e 65 73 | 20 74 6f 20 63 68 61 6e |se lines| to chan|
|00001b70| 67 65 20 74 68 65 20 70 | 6c 61 63 65 73 20 77 68 |ge the p|laces wh|
|00001b80| 65 72 65 20 74 68 65 20 | 6e 65 77 20 6d 61 63 72 |ere the |new macr|
|00001b90| 6f 0a 69 73 20 73 74 6f | 72 65 64 2e 0a 0a 0a 46 |o.is sto|red....F|
|00001ba0| 6f 72 6d 61 74 20 6f 66 | 20 6b 65 79 62 6f 61 72 |ormat of| keyboar|
|00001bb0| 64 20 6d 61 63 72 6f 73 | 20 64 75 72 69 6e 67 20 |d macros| during |
|00001bc0| 65 64 69 74 69 6e 67 3a | 0a 0a 54 65 78 74 20 69 |editing:|..Text i|
|00001bd0| 73 20 64 69 76 69 64 65 | 64 20 69 6e 74 6f 20 22 |s divide|d into "|
|00001be0| 77 6f 72 64 73 22 20 73 | 65 70 61 72 61 74 65 64 |words" s|eparated|
|00001bf0| 20 62 79 20 77 68 69 74 | 65 73 70 61 63 65 2e 20 | by whit|espace. |
|00001c00| 20 45 78 63 65 70 74 20 | 66 6f 72 0a 74 68 65 20 | Except |for.the |
|00001c10| 77 6f 72 64 73 20 64 65 | 73 63 72 69 62 65 64 20 |words de|scribed |
|00001c20| 62 65 6c 6f 77 2c 20 74 | 68 65 20 63 68 61 72 61 |below, t|he chara|
|00001c30| 63 74 65 72 73 20 6f 66 | 20 65 61 63 68 20 77 6f |cters of| each wo|
|00001c40| 72 64 20 67 6f 20 64 69 | 72 65 63 74 6c 79 0a 61 |rd go di|rectly.a|
|00001c50| 73 20 63 68 61 72 61 63 | 74 65 72 73 20 6f 66 20 |s charac|ters of |
|00001c60| 74 68 65 20 6d 61 63 72 | 6f 2e 20 20 54 68 65 20 |the macr|o.  The |
|00001c70| 77 68 69 74 65 73 70 61 | 63 65 20 74 68 61 74 20 |whitespa|ce that |
|00001c80| 73 65 70 61 72 61 74 65 | 73 20 77 6f 72 64 73 0a |separate|s words.|
|00001c90| 69 73 20 69 67 6e 6f 72 | 65 64 2e 20 20 57 68 69 |is ignor|ed.  Whi|
|00001ca0| 74 65 73 70 61 63 65 20 | 69 6e 20 74 68 65 20 6d |tespace |in the m|
|00001cb0| 61 63 72 6f 20 6d 75 73 | 74 20 62 65 20 77 72 69 |acro mus|t be wri|
|00001cc0| 74 74 65 6e 20 65 78 70 | 6c 69 63 69 74 6c 79 2c |tten exp|licitly,|
|00001cd0| 0a 61 73 20 69 6e 20 22 | 66 6f 6f 20 53 50 43 20 |.as in "|foo SPC |
|00001ce0| 62 61 72 20 52 45 54 22 | 2e 0a 0a 20 2a 20 54 68 |bar RET"|... * Th|
|00001cf0| 65 20 73 70 65 63 69 61 | 6c 20 77 6f 72 64 73 20 |e specia|l words |
|00001d00| 52 45 54 2c 20 53 50 43 | 2c 20 54 41 42 2c 20 44 |RET, SPC|, TAB, D|
|00001d10| 45 4c 2c 20 4c 46 44 2c | 20 45 53 43 2c 20 61 6e |EL, LFD,| ESC, an|
|00001d20| 64 20 4e 55 4c 20 72 65 | 70 72 65 73 65 6e 74 0a |d NUL re|present.|
|00001d30| 20 20 20 73 70 65 63 69 | 61 6c 20 63 6f 6e 74 72 |   speci|al contr|
|00001d40| 6f 6c 20 63 68 61 72 61 | 63 74 65 72 73 2e 20 20 |ol chara|cters.  |
|00001d50| 54 68 65 20 77 6f 72 64 | 73 20 6d 75 73 74 20 62 |The word|s must b|
|00001d60| 65 20 77 72 69 74 74 65 | 6e 20 69 6e 20 75 70 70 |e writte|n in upp|
|00001d70| 65 72 63 61 73 65 2e 0a | 0a 20 2a 20 41 20 77 6f |ercase..|. * A wo|
|00001d80| 72 64 20 69 6e 20 61 6e | 67 6c 65 20 62 72 61 63 |rd in an|gle brac|
|00001d90| 6b 65 74 73 2c 20 65 2e | 67 2e 2c 20 3c 72 65 74 |kets, e.|g., <ret|
|00001da0| 75 72 6e 3e 2c 20 3c 64 | 6f 77 6e 3e 2c 20 6f 72 |urn>, <d|own>, or|
|00001db0| 20 3c 66 31 3e 2c 20 72 | 65 70 72 65 73 65 6e 74 | <f1>, r|epresent|
|00001dc0| 73 0a 20 20 20 61 20 66 | 75 6e 63 74 69 6f 6e 20 |s.   a f|unction |
|00001dd0| 6b 65 79 2e 20 20 28 4e | 6f 74 65 20 74 68 61 74 |key.  (N|ote that|
|00001de0| 20 69 6e 20 74 68 65 20 | 73 74 61 6e 64 61 72 64 | in the |standard|
|00001df0| 20 63 6f 6e 66 69 67 75 | 72 61 74 69 6f 6e 2c 20 | configu|ration, |
|00001e00| 74 68 65 0a 20 20 20 66 | 75 6e 63 74 69 6f 6e 20 |the.   f|unction |
|00001e10| 6b 65 79 20 3c 72 65 74 | 75 72 6e 3e 20 61 6e 64 |key <ret|urn> and|
|00001e20| 20 74 68 65 20 63 6f 6e | 74 72 6f 6c 20 6b 65 79 | the con|trol key|
|00001e30| 20 52 45 54 20 61 72 65 | 20 73 79 6e 6f 6e 79 6d | RET are| synonym|
|00001e40| 6f 75 73 2e 29 0a 20 20 | 20 59 6f 75 20 63 61 6e |ous.).  | You can|
|00001e50| 20 75 73 65 20 61 6e 67 | 6c 65 20 62 72 61 63 6b | use ang|le brack|
|00001e60| 65 74 73 20 6f 6e 20 74 | 68 65 20 77 6f 72 64 73 |ets on t|he words|
|00001e70| 20 52 45 54 2c 20 53 50 | 43 2c 20 65 74 63 2e 2c | RET, SP|C, etc.,|
|00001e80| 20 62 75 74 20 74 68 65 | 79 0a 20 20 20 61 72 65 | but the|y.   are|
|00001e90| 20 6e 6f 74 20 72 65 71 | 75 69 72 65 64 20 74 68 | not req|uired th|
|00001ea0| 65 72 65 2e 0a 0a 20 2a | 20 4b 65 79 73 20 63 61 |ere... *| Keys ca|
|00001eb0| 6e 20 62 65 20 77 72 69 | 74 74 65 6e 20 62 79 20 |n be wri|tten by |
|00001ec0| 74 68 65 69 72 20 41 53 | 43 49 49 20 63 6f 64 65 |their AS|CII code|
|00001ed0| 2c 20 75 73 69 6e 67 20 | 61 20 62 61 63 6b 73 6c |, using |a backsl|
|00001ee0| 61 73 68 20 66 6f 6c 6c | 6f 77 65 64 0a 20 20 20 |ash foll|owed.   |
|00001ef0| 62 79 20 75 70 20 74 6f | 20 73 69 78 20 6f 63 74 |by up to| six oct|
|00001f00| 61 6c 20 64 69 67 69 74 | 73 2e 20 20 54 68 69 73 |al digit|s.  This|
|00001f10| 20 69 73 20 74 68 65 20 | 6f 6e 6c 79 20 77 61 79 | is the |only way|
|00001f20| 20 74 6f 20 72 65 70 72 | 65 73 65 6e 74 20 6b 65 | to repr|esent ke|
|00001f30| 79 73 0a 20 20 20 77 69 | 74 68 20 63 6f 64 65 73 |ys.   wi|th codes|
|00001f40| 20 61 62 6f 76 65 20 5c | 33 37 37 2e 0a 0a 20 2a | above \|377... *|
|00001f50| 20 4f 6e 65 20 6f 72 20 | 6d 6f 72 65 20 70 72 65 | One or |more pre|
|00001f60| 66 69 78 65 73 20 4d 2d | 20 28 6d 65 74 61 29 2c |fixes M-| (meta),|
|00001f70| 20 43 2d 20 28 63 6f 6e | 74 72 6f 6c 29 2c 20 53 | C- (con|trol), S|
|00001f80| 2d 20 28 73 68 69 66 74 | 29 2c 20 41 2d 20 28 61 |- (shift|), A- (a|
|00001f90| 6c 74 29 2c 0a 20 20 20 | 48 2d 20 28 68 79 70 65 |lt),.   |H- (hype|
|00001fa0| 72 29 2c 20 61 6e 64 20 | 73 2d 20 28 73 75 70 65 |r), and |s- (supe|
|00001fb0| 72 29 20 6d 61 79 20 70 | 72 65 63 65 64 65 20 61 |r) may p|recede a|
|00001fc0| 20 63 68 61 72 61 63 74 | 65 72 20 6f 72 20 6b 65 | charact|er or ke|
|00001fd0| 79 20 6e 6f 74 61 74 69 | 6f 6e 2e 0a 20 20 20 46 |y notati|on..   F|
|00001fe0| 6f 72 20 66 75 6e 63 74 | 69 6f 6e 20 6b 65 79 73 |or funct|ion keys|
|00001ff0| 2c 20 74 68 65 20 70 72 | 65 66 69 78 65 73 20 6d |, the pr|efixes m|
|00002000| 61 79 20 67 6f 20 69 6e | 73 69 64 65 20 6f 72 20 |ay go in|side or |
|00002010| 6f 75 74 73 69 64 65 20 | 6f 66 20 74 68 65 0a 20 |outside |of the. |
|00002020| 20 20 62 72 61 63 6b 65 | 74 73 3a 20 20 43 2d 3c |  bracke|ts:  C-<|
|00002030| 64 6f 77 6e 3e 20 3d 20 | 3c 43 2d 64 6f 77 6e 3e |down> = |<C-down>|
|00002040| 2e 20 20 54 68 65 20 70 | 72 65 66 69 78 65 73 20 |.  The p|refixes |
|00002050| 6d 61 79 20 62 65 20 77 | 72 69 74 74 65 6e 20 69 |may be w|ritten i|
|00002060| 6e 0a 20 20 20 61 6e 79 | 20 6f 72 64 65 72 3a 20 |n.   any| order: |
|00002070| 20 4d 2d 43 2d 78 20 3d | 20 43 2d 4d 2d 78 2e 0a | M-C-x =| C-M-x..|
|00002080| 0a 20 20 20 50 72 65 66 | 69 78 65 73 20 61 72 65 |.   Pref|ixes are|
|00002090| 20 6e 6f 74 20 61 6c 6c | 6f 77 65 64 20 6f 6e 20 | not all|owed on |
|000020a0| 6d 75 6c 74 69 2d 6b 65 | 79 20 77 6f 72 64 73 2c |multi-ke|y words,|
|000020b0| 20 65 2e 67 2e 2c 20 43 | 2d 61 62 63 2c 20 65 78 | e.g., C|-abc, ex|
|000020c0| 63 65 70 74 0a 20 20 20 | 74 68 61 74 20 74 68 65 |cept.   |that the|
|000020d0| 20 4d 65 74 61 20 70 72 | 65 66 69 78 20 69 73 20 | Meta pr|efix is |
|000020e0| 61 6c 6c 6f 77 65 64 20 | 6f 6e 20 61 20 73 65 71 |allowed |on a seq|
|000020f0| 75 65 6e 63 65 20 6f 66 | 20 64 69 67 69 74 73 20 |uence of| digits |
|00002100| 61 6e 64 20 6f 70 74 69 | 6f 6e 61 6c 0a 20 20 20 |and opti|onal.   |
|00002110| 6d 69 6e 75 73 20 73 69 | 67 6e 3a 20 20 4d 2d 2d |minus si|gn:  M--|
|00002120| 31 32 33 20 3d 20 4d 2d | 2d 20 4d 2d 31 20 4d 2d |123 = M-|- M-1 M-|
|00002130| 32 20 4d 2d 33 2e 0a 0a | 20 2a 20 54 68 65 20 60 |2 M-3...| * The `|
|00002140| 5e 27 20 6e 6f 74 61 74 | 69 6f 6e 20 66 6f 72 20 |^' notat|ion for |
|00002150| 63 6f 6e 74 72 6f 6c 20 | 63 68 61 72 61 63 74 65 |control |characte|
|00002160| 72 73 20 61 6c 73 6f 20 | 77 6f 72 6b 73 3a 20 20 |rs also |works:  |
|00002170| 5e 4d 20 3d 20 43 2d 6d | 2e 0a 0a 20 2a 20 44 6f |^M = C-m|... * Do|
|00002180| 75 62 6c 65 20 61 6e 67 | 6c 65 20 62 72 61 63 6b |uble ang|le brack|
|00002190| 65 74 73 20 65 6e 63 6c | 6f 73 65 20 63 6f 6d 6d |ets encl|ose comm|
|000021a0| 61 6e 64 20 6e 61 6d 65 | 73 3a 20 20 3c 3c 6e 65 |and name|s:  <<ne|
|000021b0| 78 74 2d 6c 69 6e 65 3e | 3e 20 69 73 0a 20 20 20 |xt-line>|> is.   |
|000021c0| 73 68 6f 72 74 68 61 6e | 64 20 66 6f 72 20 4d 2d |shorthan|d for M-|
|000021d0| 78 20 6e 65 78 74 2d 6c | 69 6e 65 20 52 45 54 2e |x next-l|ine RET.|
|000021e0| 0a 0a 20 2a 20 46 69 6e | 61 6c 6c 79 2c 20 52 45 |.. * Fin|ally, RE|
|000021f0| 4d 20 6f 72 20 3b 3b 20 | 63 61 75 73 65 73 20 74 |M or ;; |causes t|
|00002200| 68 65 20 72 65 73 74 20 | 6f 66 20 74 68 65 20 6c |he rest |of the l|
|00002210| 69 6e 65 20 74 6f 20 62 | 65 20 69 67 6e 6f 72 65 |ine to b|e ignore|
|00002220| 64 20 61 73 20 61 0a 20 | 20 20 63 6f 6d 6d 65 6e |d as a. |  commen|
|00002230| 74 2e 0a 0a 41 6e 79 20 | 77 6f 72 64 20 6d 61 79 |t...Any |word may|
|00002240| 20 62 65 20 70 72 65 66 | 69 78 65 64 20 62 79 20 | be pref|ixed by |
|00002250| 61 20 6d 75 6c 74 69 70 | 6c 69 65 72 20 69 6e 20 |a multip|lier in |
|00002260| 74 68 65 20 66 6f 72 6d | 20 6f 66 20 61 20 64 65 |the form| of a de|
|00002270| 63 69 6d 61 6c 0a 6e 75 | 6d 62 65 72 20 61 6e 64 |cimal.nu|mber and|
|00002280| 20 60 2a 27 3a 20 20 33 | 2a 3c 72 69 67 68 74 3e | `*':  3|*<right>|
|00002290| 20 3d 20 3c 72 69 67 68 | 74 3e 20 3c 72 69 67 68 | = <righ|t> <righ|
|000022a0| 74 3e 20 3c 72 69 67 68 | 74 3e 2c 20 61 6e 64 0a |t> <righ|t>, and.|
|000022b0| 31 30 2a 66 6f 6f 20 3d | 20 66 6f 6f 66 6f 6f 66 |10*foo =| foofoof|
|000022c0| 6f 6f 66 6f 6f 66 6f 6f | 66 6f 6f 66 6f 6f 66 6f |oofoofoo|foofoofo|
|000022d0| 6f 66 6f 6f 66 6f 6f 2e | 0a 0a 4d 75 6c 74 69 70 |ofoofoo.|..Multip|
|000022e0| 6c 65 20 74 65 78 74 20 | 6b 65 79 73 20 63 61 6e |le text |keys can|
|000022f0| 20 6e 6f 72 6d 61 6c 6c | 79 20 62 65 20 73 74 72 | normall|y be str|
|00002300| 75 6e 67 20 74 6f 67 65 | 74 68 65 72 20 74 6f 20 |ung toge|ther to |
|00002310| 66 6f 72 6d 20 61 20 77 | 6f 72 64 2c 0a 62 75 74 |form a w|ord,.but|
|00002320| 20 79 6f 75 20 6d 61 79 | 20 6e 65 65 64 20 74 6f | you may| need to|
|00002330| 20 61 64 64 20 77 68 69 | 74 65 73 70 61 63 65 20 | add whi|tespace |
|00002340| 69 66 20 74 68 65 20 77 | 6f 72 64 20 77 6f 75 6c |if the w|ord woul|
|00002350| 64 20 6c 6f 6f 6b 20 6c | 69 6b 65 20 6f 6e 65 0a |d look l|ike one.|
|00002360| 6f 66 20 74 68 65 20 61 | 62 6f 76 65 20 6e 6f 74 |of the a|bove not|
|00002370| 61 74 69 6f 6e 73 3a 20 | 20 60 3b 20 3b 20 3b 27 |ations: | `; ; ;'|
|00002380| 20 69 73 20 61 20 6b 65 | 79 62 6f 61 72 64 20 6d | is a ke|yboard m|
|00002390| 61 63 72 6f 20 77 69 74 | 68 20 74 68 72 65 65 0a |acro wit|h three.|
|000023a0| 73 65 6d 69 63 6f 6c 6f | 6e 73 2c 20 62 75 74 20 |semicolo|ns, but |
|000023b0| 60 3b 3b 3b 27 20 69 73 | 20 61 20 63 6f 6d 6d 65 |`;;;' is| a comme|
|000023c0| 6e 74 2e 20 20 4c 69 6b | 65 77 69 73 65 2c 20 60 |nt.  Lik|ewise, `|
|000023d0| 5c 20 31 20 32 20 33 27 | 20 69 73 20 66 6f 75 72 |\ 1 2 3'| is four|
|000023e0| 0a 6b 65 79 73 20 62 75 | 74 20 60 5c 31 32 33 27 |.keys bu|t `\123'|
|000023f0| 20 69 73 20 61 20 73 69 | 6e 67 6c 65 20 6b 65 79 | is a si|ngle key|
|00002400| 20 77 72 69 74 74 65 6e | 20 69 6e 20 6f 63 74 61 | written| in octa|
|00002410| 6c 2c 20 61 6e 64 20 60 | 3c 20 72 69 67 68 74 20 |l, and `|< right |
|00002420| 3e 27 0a 69 73 20 73 65 | 76 65 6e 20 6b 65 79 73 |>'.is se|ven keys|
|00002430| 20 62 75 74 20 60 3c 72 | 69 67 68 74 3e 27 20 69 | but `<r|ight>' i|
|00002440| 73 20 61 20 73 69 6e 67 | 6c 65 20 66 75 6e 63 74 |s a sing|le funct|
|00002450| 69 6f 6e 20 6b 65 79 2e | 20 20 57 68 65 6e 20 69 |ion key.|  When i|
|00002460| 6e 0a 64 6f 75 62 74 2c | 20 75 73 65 20 77 68 69 |n.doubt,| use whi|
|00002470| 74 65 73 70 61 63 65 2e | 1f 0a 28 64 65 66 61 6c |tespace.|..(defal|
|00002480| 69 61 73 20 27 65 64 6d | 61 63 72 6f 2d 6d 6f 64 |ias 'edm|acro-mod|
|00002490| 65 20 23 5b 6e 69 6c 20 | 22 c0 c1 21 87 22 20 5b |e #[nil |"..!." [|
|000024a0| 65 72 72 6f 72 20 22 54 | 68 69 73 20 6d 6f 64 65 |error "T|his mode|
|000024b0| 20 63 61 6e 20 62 65 20 | 65 6e 61 62 6c 65 64 20 | can be |enabled |
|000024c0| 6f 6e 6c 79 20 62 79 20 | 60 65 64 69 74 2d 6b 62 |only by |`edit-kb|
|000024d0| 64 2d 6d 61 63 72 6f 27 | 22 5d 20 32 20 28 23 24 |d-macro'|"] 2 (#$|
|000024e0| 20 2e 20 36 32 34 37 29 | 20 6e 69 6c 5d 29 0a 28 | . 6247)| nil]).(|
|000024f0| 70 75 74 20 28 71 75 6f | 74 65 20 65 64 6d 61 63 |put (quo|te edmac|
|00002500| 72 6f 2d 6d 6f 64 65 29 | 20 28 71 75 6f 74 65 20 |ro-mode)| (quote |
|00002510| 6d 6f 64 65 2d 63 6c 61 | 73 73 29 20 28 71 75 6f |mode-cla|ss) (quo|
|00002520| 74 65 20 73 70 65 63 69 | 61 6c 29 29 0a 28 64 65 |te speci|al)).(de|
|00002530| 66 61 6c 69 61 73 20 27 | 65 64 6d 61 63 72 6f 2d |falias '|edmacro-|
|00002540| 66 6f 72 6d 61 74 2d 6b | 65 79 73 20 23 5b 28 6d |format-k|eys #[(m|
|00002550| 61 63 72 6f 20 26 6f 70 | 74 69 6f 6e 61 6c 20 76 |acro &op|tional v|
|00002560| 65 72 62 6f 73 65 29 20 | 22 c0 09 21 11 c2 c3 20 |erbose) |"..!... |
|00002570| c4 20 85 0f 00 c4 20 43 | c5 20 43 23 1e 06 c7 1e |. .... C|. C#....|
|00002580| 08 c9 0e 08 9b 1e 5c 6e | 0e 0b 83 27 00 cc 82 28 |......\n|...'...(|
|00002590| 00 cd 1e 0e cf 1e 10 d1 | 1e 12 d3 09 d4 5c 22 1e |........|.....\".|
|000025a0| 15 d6 1e 17 d8 1e 19 0e | 1a db 3d 89 1e 1c 83 49 |........|..=....I|
|000025b0| 00 cf 16 1a 09 3b 83 7f | 00 d8 1e 1d 09 47 1e 1e |.....;..|.....G..|
|000025c0| 0e 1d 0e 1e 57 83 7e 00 | 0e 15 0e 1d 48 df 59 83 |....W.~.|....H.Y.|
|000025d0| 74 00 0e 15 0e 1d 0e 15 | 0e 1d 48 e0 5c 5c 49 88 |t.......|..H.\\I.|
|000025e0| 0e 1d db 5c 5c 89 16 1d | 82 57 00 2a 0e 15 d8 48 |...\\...|.W.*...H|
|000025f0| e1 3d 84 62 05 0e 15 d8 | 48 a8 83 e0 00 0e 15 d8 |.=.b....|H.......|
|00002600| 48 0e 5c 6e 3e 83 e0 00 | e2 e3 0e 15 d8 db 23 21 |H.\n>...|......#!|
|00002610| e4 3e 83 e0 00 db 1e 1d | 0e 15 0e 1d 48 0e 5c 6e |.>......|....H.\n|
|00002620| 41 3e 83 be 00 0e 1d 54 | 16 1d 82 aa 00 0e 15 0e |A>.....T|........|
|00002630| 1d 48 0e 08 3e 3f 85 dc | 00 e5 e3 0e 15 d8 0e 1d |.H..>?..|........|
|00002640| 23 e6 51 e3 0e 15 0e 1d | 5c 22 16 15 29 86 90 01 |#.Q.....|\"..)...|
|00002650| 0e 15 d8 48 e7 3d 83 3c | 01 e2 e8 21 e9 3d 83 3c |...H.=.<|...!.=.<|
|00002660| 01 db 1e 1d 0e 15 0e 1d | 48 e7 3d 83 06 01 0e 1d |........|H.=.....|
|00002670| 54 16 1d 82 f4 00 0e 15 | 0e 1d 48 0e 08 3e 3f 85 |T.......|..H..>?.|
|00002680| 38 01 0e 1d 1e 2a d6 1e | 2b 0e 2a 53 89 16 2a d8 |8....*..|+.*S..*.|
|00002690| 59 83 2d 01 0e 2b ec 50 | 16 2b 82 19 01 0e 2b 2a |Y.-..+.P|.+....+*|
|000026a0| e3 0e 15 0e 1d 5c 22 16 | 15 29 86 90 01 0e 15 d8 |.....\".|.)......|
|000026b0| 48 e7 3d 85 90 01 e2 ed | 21 e9 3d 85 90 01 db 1e |H.=.....|!.=.....|
|000026c0| 1d 0e 15 0e 1d 48 ee 3d | 83 5f 01 0e 1d 54 16 1d |.....H.=|._...T..|
|000026d0| 0e 15 0e 1d 48 ef 3e 83 | 71 01 0e 1d 54 16 1d 82 |....H.>.|q...T...|
|000026e0| 5f 01 0e 15 0e 1d 48 0e | 08 3e 3f 85 8f 01 ec e3 |_.....H.|.>?.....|
|000026f0| 0e 15 db 0e 1d 23 e6 51 | e3 0e 15 0e 1d 5c 22 16 |.....#.Q|.....\".|
|00002700| 15 29 1e 30 f1 f2 db 0e | 06 1e 33 cf 1e 34 cf 1e |.).0....|..3..4..|
|00002710| 35 cf 1e 36 0e 33 3a 83 | c9 01 0e 33 40 16 34 f7 |5..6.3:.|...3@.4.|
|00002720| 0e 34 0e 15 5c 22 89 16 | 35 83 c0 01 0e 35 0e 36 |.4..\"..|5....5.6|
|00002730| 42 16 36 0e 33 41 89 16 | 33 82 a4 01 0e 36 9f 2c |B.6.3A..|3....6.,|
|00002740| 23 1e 38 e3 0e 15 d8 0e | 38 23 1e 39 cf 1e 3a cf |#.8.....|8#.9..:.|
|00002750| 1e 3b cf 1e 3c 0e 06 1e | 3d cf 1e 34 cf 1e 35 fe |.;..<...|=..4..5.|
|00002760| 1e 3f cf 1e 40 0e 3d 3a | 83 20 02 0e 3d 40 16 34 |.?..@.=:|. ..=@.4|
|00002770| f7 0e 34 0e 39 5c 22 89 | 16 35 a8 3f 85 0d 02 0e |..4.9\".|.5.?....|
|00002780| 35 89 16 40 3f 89 16 3f | 83 20 02 0e 3d 41 89 16 |5..@?..?|. ..=A..|
|00002790| 3d 82 f4 01 0e 40 2d 86 | a7 02 f7 0e 41 0e 15 5c |=....@-.|....A..\|
|000027a0| 22 89 16 3a 85 a7 02 0e | 3a 16 3b e3 0e 15 d8 0e |"..:....|:.;.....|
|000027b0| 3b 23 16 3c f7 0e 41 0e | 3c 5c 22 89 16 3a 85 a7 |;#.<..A.|<\"..:..|
|000027c0| 02 0e 06 1e 42 cf 1e 34 | cf 1e 35 fe 1e 43 cf 1e |....B..4|..5..C..|
|000027d0| 44 0e 42 3a 83 98 02 0e | 42 40 16 34 f7 0e 34 0e |D.B:....|B@.4..4.|
|000027e0| 3a 5c 22 89 16 35 a8 84 | 8b 02 0e 35 83 8b 02 0e |:\"..5..|...5....|
|000027f0| 3b 16 38 0e 3c 16 39 0e | 35 16 44 cf 89 16 43 82 |;.8.<.9.|5.D...C.|
|00002800| 8c 02 fe 83 98 02 0e 42 | 41 89 16 42 82 5d 02 0e |.......B|A..B.]..|
|00002810| 43 83 a4 02 cf 16 3a cf | 82 a6 02 0e 44 2d 1e 45 |C.....:.|....D-.E|
|00002820| 0e 39 d8 48 1e 46 0e 38 | 1e 1d 0e 15 47 1e 47 cf |.9.H.F.8|....G.G.|
|00002830| 1e 48 0e 1d 0e 47 57 83 | 2b 03 0e 15 0e 1d 48 89 |.H...GW.|+.....H.|
|00002840| 16 48 a8 83 2b 03 0e 48 | 81 49 00 56 83 2b 03 0e |.H..+..H|.I.V.+..|
|00002850| 48 0e 0e 57 83 2b 03 0e | 48 81 4a 00 55 84 2b 03 |H..W.+..|H.J.U.+.|
|00002860| e2 81 4b 00 0e 48 21 21 | 81 4c 00 3d 83 2b 03 0e |..K..H!!|.L.=.+..|
|00002870| 1d 0e 15 47 81 4d 00 5a | 56 84 21 03 0e 48 0e 15 |...G.M.Z|V.!..H..|
|00002880| 0e 1d db 5c 5c 48 3d 83 | 21 03 0e 48 0e 15 0e 1d |...\\H=.|!..H....|
|00002890| 81 4d 00 5c 5c 48 3d 84 | 2b 03 0e 1d db 5c 5c 89 |.M.\\H=.|+....\\.|
|000028a0| 16 1d 82 bd 02 0e 1d 2b | 1e 4e cf 1e 4f 0e 45 3b |.......+|.N..O.E;|
|000028b0| 83 3c 03 cf 16 45 0e 45 | 81 4c 00 3d 83 e9 03 0e |.<...E.E|.L.=....|
|000028c0| 30 84 e9 03 0e 4e db 56 | 83 e9 03 0e 46 a8 83 e9 |0....N.V|....F...|
|000028d0| 03 0e 46 81 49 00 56 83 | e9 03 0e 46 0e 0e 58 83 |..F.I.V.|...F..X.|
|000028e0| e9 03 0e 46 81 4a 00 55 | 84 e9 03 0e 4e 81 50 00 |...F.J.U|....N.P.|
|000028f0| 56 83 7f 03 81 50 00 16 | 4e e3 0e 15 d8 0e 4e 23 |V....P..|N.....N#|
|00002900| b0 01 16 4f 81 51 00 81 | 52 00 0e 4f 5c 22 83 a4 |...O.Q..|R..O\"..|
|00002910| 03 81 4d 00 16 4e 0e 4f | d8 81 4d 00 4f 16 4f 81 |..M..N.O|..M.O.O.|
|00002920| 51 00 81 53 00 0e 4f 5c | 22 84 e9 03 81 51 00 81 |Q..S..O\|"....Q..|
|00002930| 54 00 0e 4f 5c 22 84 c4 | 03 0e 4f 0e 12 9d 83 d0 |T..O\"..|..O.....|
|00002940| 03 81 55 00 81 4b 00 0e | 4f e6 23 16 4f 0e 1a 83 |..U..K..|O.#.O...|
|00002950| e2 03 81 56 00 81 57 00 | 0e 45 0e 4e 23 16 45 0e |...V..W.|.E.N#.E.|
|00002960| 4e 16 38 82 54 04 0e 45 | 81 58 00 3d 83 43 04 0e |N.8.T..E|.X.=.C..|
|00002970| 4e 0e 38 56 83 43 04 0e | 15 0e 4e 48 81 59 00 3e |N.8V.C..|..NH.Y.>|
|00002980| 83 43 04 e3 0e 15 0e 38 | 0e 4e 23 b0 01 16 4f 81 |.C.....8|.N#...O.|
|00002990| 5a 00 81 5b 00 0e 4f 21 | 21 83 43 04 81 5a 00 81 |Z..[..O!|!.C..Z..|
|000029a0| 5b 00 0e 4f 21 21 83 30 | 04 0e 4f 16 45 81 56 00 |[..O!!.0|..O.E.V.|
|000029b0| 81 5c 5c 00 0e 4f 5c 22 | 16 4f 0e 4e 54 16 38 82 |.\\..O\"|.O.NT.8.|
|000029c0| 54 04 81 55 00 81 5d 00 | 0e 3a 86 50 04 0e 39 e6 |T..U..].|.:.P..9.|
|000029d0| 23 16 4f 0e 30 83 60 04 | 0e 30 0e 4f 50 16 4f 81 |#.O.0.`.|.0.OP.O.|
|000029e0| 51 00 e6 0e 4f 5c 22 84 | b1 04 db 0e 38 1e 5e 1e |Q...O\".|....8.^.|
|000029f0| 5f 81 60 00 0e 15 89 d8 | 0e 38 0e 5e 0e 38 0e 5e |_.`.....|.8.^.8.^|
|00002a00| 5c 5c 26 06 84 95 04 0e | 5f 54 16 5f 0e 5e 0e 38 |\\&.....|_T._.^.8|
|00002a10| 5c 5c 16 5e 82 71 04 0e | 5f db 56 83 b0 04 81 56 |\\.^.q..|_.V....V|
|00002a20| 00 81 61 00 0e 5f 0e 4f | 23 16 4f 0e 38 0e 5f 5f |..a.._.O|#.O.8.__|
|00002a30| 16 38 2a e3 0e 15 0e 38 | 5c 22 16 15 0e 1a 83 18 |.8*....8|\"......|
|00002a40| 05 0e 17 d6 9a 84 cd 04 | 0e 17 81 62 00 50 16 17 |........|...b.P..|
|00002a50| 0e 17 0e 4f 50 16 17 0e | 45 83 12 05 0e 45 3b 84 |...OP...|E....E;.|
|00002a60| e5 04 0e 45 39 83 12 05 | 0e 17 81 63 00 81 64 00 |...E9...|...c..d.|
|00002a70| 0e 4f 47 81 65 00 a5 5a | db 5d 81 66 00 5c 22 81 |.OG.e..Z|.].f.\".|
|00002a80| 67 00 0e 45 3b 83 09 05 | 0e 45 82 0f 05 81 68 00 |g..E;...|.E....h.|
|00002a90| 0e 45 21 52 16 17 d8 16 | 19 82 5d 05 0e 19 0e 4f |.E!R....|..]....O|
|00002aa0| 47 5c 5c 81 4d 00 5c 5c | 81 69 00 56 83 3c 05 0e |G\\.M.\\|.i.V.<..|
|00002ab0| 1c 84 3c 05 0e 17 81 6a | 00 50 16 17 db 16 19 82 |..<....j|.P......|
|00002ac0| 4e 05 0e 17 d6 9a 84 4e | 05 0e 17 e6 50 16 17 0e |N......N|....P...|
|00002ad0| 19 54 16 19 0e 17 0e 4f | 50 16 17 0e 19 0e 4f 47 |.T.....O|P.....OG|
|00002ae0| 5c 5c 16 19 2e 5c 6e 82 | 7f 00 0e 17 2e 5c 6e 87 |\\...\n.|.....\n.|
|00002af0| 22 20 5b 65 64 6d 61 63 | 72 6f 2d 66 69 78 2d 6d |" [edmac|ro-fix-m|
|00002b00| 65 6e 75 2d 63 6f 6d 6d | 61 6e 64 73 20 6d 61 63 |enu-comm|ands mac|
|00002b10| 72 6f 20 61 70 70 65 6e | 64 20 63 75 72 72 65 6e |ro appen|d curren|
|00002b20| 74 2d 6d 69 6e 6f 72 2d | 6d 6f 64 65 2d 6d 61 70 |t-minor-|mode-map|
|00002b30| 73 20 63 75 72 72 65 6e | 74 2d 6c 6f 63 61 6c 2d |s curren|t-local-|
|00002b40| 6d 61 70 20 63 75 72 72 | 65 6e 74 2d 67 6c 6f 62 |map curr|ent-glob|
|00002b50| 61 6c 2d 6d 61 70 20 6d | 61 70 73 20 28 65 6e 64 |al-map m|aps (end|
|00002b60| 2d 6d 61 63 72 6f 20 34 | 38 20 34 39 20 35 30 20 |-macro 4|8 49 50 |
|00002b70| 35 31 20 35 32 20 35 33 | 20 35 34 20 35 35 20 35 |51 52 53| 54 55 5|
|00002b80| 36 20 35 37 20 34 35 20 | 32 31 20 2d 31 33 34 32 |6 57 45 |21 -1342|
|00002b90| 31 37 36 38 33 20 2d 31 | 33 34 32 31 37 36 38 30 |17683 -1|34217680|
|00002ba0| 20 2d 31 33 34 32 31 37 | 36 37 39 20 2d 31 33 34 | -134217|679 -134|
|00002bb0| 32 31 37 36 37 38 20 2d | 31 33 34 32 31 37 36 37 |217678 -|13421767|
|00002bc0| 37 20 2d 31 33 34 32 31 | 37 36 37 36 20 2d 31 33 |7 -13421|7676 -13|
|00002bd0| 34 32 31 37 36 37 35 20 | 2d 31 33 34 32 31 37 36 |4217675 |-1342176|
|00002be0| 37 34 20 2d 31 33 34 32 | 31 37 36 37 33 20 2d 31 |74 -1342|17673 -1|
|00002bf0| 33 34 32 31 37 36 37 32 | 20 2d 31 33 34 32 31 37 |34217672| -134217|
|00002c00| 36 37 31 29 20 70 6b 65 | 79 73 20 31 33 20 6d 64 |671) pke|ys 13 md|
|00002c10| 69 67 73 20 65 64 6d 61 | 63 72 6f 2d 65 69 67 68 |igs edma|cro-eigh|
|00002c20| 74 2d 62 69 74 73 20 32 | 35 35 20 31 32 37 20 6d |t-bits 2|55 127 m|
|00002c30| 61 78 6b 65 79 20 6e 69 | 6c 20 63 61 73 65 2d 66 |axkey ni|l case-f|
|00002c40| 6f 6c 64 2d 73 65 61 72 | 63 68 20 28 22 4e 55 4c |old-sear|ch ("NUL|
|00002c50| 22 20 22 54 41 42 22 20 | 22 4c 46 44 22 20 22 52 |" "TAB" |"LFD" "R|
|00002c60| 45 54 22 20 22 45 53 43 | 22 20 22 53 50 43 22 20 |ET" "ESC|" "SPC" |
|00002c70| 22 44 45 4c 22 20 22 52 | 45 4d 22 29 20 72 65 73 |"DEL" "R|EM") res|
|00002c80| 2d 77 6f 72 64 73 20 76 | 63 6f 6e 63 61 74 20 5b |-words v|concat [|
|00002c90| 65 6e 64 2d 6d 61 63 72 | 6f 5d 20 72 65 73 74 2d |end-macr|o] rest-|
|00002ca0| 6d 61 63 20 22 22 20 72 | 65 73 20 30 20 6c 65 6e |mac "" r|es 0 len|
|00002cb0| 20 76 65 72 62 6f 73 65 | 20 31 20 6f 6e 65 2d 6c | verbose| 1 one-l|
|00002cc0| 69 6e 65 20 69 20 47 35 | 32 33 30 33 20 31 32 38 |ine i G5|2303 128|
|00002cd0| 20 31 33 34 32 31 37 36 | 30 30 20 65 6e 64 2d 6d | 1342176|00 end-m|
|00002ce0| 61 63 72 6f 20 6b 65 79 | 2d 62 69 6e 64 69 6e 67 |acro key|-binding|
|00002cf0| 20 65 64 6d 61 63 72 6f | 2d 73 75 62 73 65 71 20 | edmacro|-subseq |
|00002d00| 28 64 69 67 69 74 2d 61 | 72 67 75 6d 65 6e 74 20 |(digit-a|rgument |
|00002d10| 6e 65 67 61 74 69 76 65 | 2d 61 72 67 75 6d 65 6e |negative|-argumen|
|00002d20| 74 29 20 22 4d 2d 22 20 | 22 20 22 20 32 31 20 5b |t) "M-" |" " 21 [|
|00002d30| 32 31 5d 20 75 6e 69 76 | 65 72 73 61 6c 2d 61 72 |21] univ|ersal-ar|
|00002d40| 67 75 6d 65 6e 74 20 47 | 35 32 33 30 35 20 47 35 |gument G|52305 G5|
|00002d50| 32 33 30 36 20 22 43 2d | 75 20 22 20 5b 32 31 5d |2306 "C-|u " [21]|
|00002d60| 20 34 35 20 28 34 38 20 | 34 39 20 35 30 20 35 31 | 45 (48 |49 50 51|
|00002d70| 20 35 32 20 35 33 20 35 | 34 20 35 35 20 35 36 20 | 52 53 5|4 55 56 |
|00002d80| 35 37 29 20 70 72 65 66 | 69 78 20 61 70 70 6c 79 |57) pref|ix apply|
|00002d90| 20 6d 61 78 20 47 35 32 | 33 30 39 20 6d 61 70 20 | max G52|309 map |
|00002da0| 62 20 47 35 32 33 31 30 | 20 6c 6f 6f 6b 75 70 2d |b G52310| lookup-|
|00002db0| 6b 65 79 20 62 69 6e 64 | 2d 6c 65 6e 20 6b 65 79 |key bind|-len key|
|00002dc0| 20 66 6b 65 79 20 74 6c | 65 6e 20 74 6b 65 79 20 | fkey tl|en tkey |
|00002dd0| 47 35 32 33 31 31 20 74 | 20 47 35 32 33 31 32 20 |G52311 t| G52312 |
|00002de0| 47 35 32 33 31 33 20 66 | 75 6e 63 74 69 6f 6e 2d |G52313 f|unction-|
|00002df0| 6b 65 79 2d 6d 61 70 20 | 47 35 32 33 31 34 20 47 |key-map |G52314 G|
|00002e00| 35 32 33 31 35 20 47 35 | 32 33 31 36 20 62 69 6e |52315 G5|2316 bin|
|00002e10| 64 20 66 69 72 73 74 20 | 47 35 32 33 31 37 20 63 |d first |G52317 c|
|00002e20| 68 20 33 32 20 39 32 20 | 63 68 61 72 2d 74 6f 2d |h 32 92 |char-to-|
|00002e30| 73 74 72 69 6e 67 20 73 | 65 6c 66 2d 69 6e 73 65 |string s|elf-inse|
|00002e40| 72 74 2d 63 6f 6d 6d 61 | 6e 64 20 32 20 74 65 78 |rt-comma|nd 2 tex|
|00002e50| 74 20 64 65 73 63 20 33 | 30 20 73 74 72 69 6e 67 |t desc 3|0 string|
|00002e60| 2d 6d 61 74 63 68 20 22 | 5e 5b 41 43 48 4d 73 53 |-match "|^[ACHMsS|
|00002e70| 5d 2d 2e 22 20 22 5e 3b | 3b 5c 5c 7c 5e 3c 2e 2a |]-." "^;|;\\|^<.*|
|00002e80| 3e 24 5c 5c 7c 5e 5c 5c | 5c 5c 5b 30 2d 39 5d 2b |>$\\|^\\|\\[0-9]+|
|00002e90| 24 5c 5c 7c 5e 5b 30 2d | 39 5d 2b 5c 5c 2a 2e 22 |$\\|^[0-|9]+\\*."|
|00002ea0| 20 22 5e 5c 5c 5e 2e 24 | 22 20 6d 61 70 63 6f 6e | "^\\^.$|" mapcon|
|00002eb0| 63 61 74 20 66 6f 72 6d | 61 74 20 22 25 73 20 2a |cat form|at "%s *|
|00002ec0| 20 25 64 22 20 65 78 65 | 63 75 74 65 2d 65 78 74 | %d" exe|cute-ext|
|00002ed0| 65 6e 64 65 64 2d 63 6f | 6d 6d 61 6e 64 20 28 72 |ended-co|mmand (r|
|00002ee0| 65 74 75 72 6e 20 31 33 | 29 20 63 6f 6d 6d 61 6e |eturn 13|) comman|
|00002ef0| 64 70 20 69 6e 74 65 72 | 6e 2d 73 6f 66 74 20 22 |dp inter|n-soft "|
|00002f00| 3c 3c 25 73 3e 3e 22 20 | 23 5b 28 63 68 29 20 22 |<<%s>>" |#[(ch) "|
|00002f10| 08 a8 83 d8 00 c1 1a c3 | 1c c5 1e 06 c7 1e 08 c5 |........|........|
|00002f20| 1e 09 ca 1e 0b 5c 66 54 | 89 14 5c 6e 47 57 83 4b |.....\fT|..\nGW.K|
|00002f30| 00 5c 6e 5c 66 48 16 06 | 0e 08 3a 83 4b 00 0e 08 |.\n\fH..|..:.K...|
|00002f40| 40 16 09 cc 08 0e 09 5c | 22 cd 55 84 43 00 0e 0b |@......\|".U.C...|
|00002f50| ce cf 0e 06 5c 22 50 16 | 0b 0e 08 41 16 08 82 15 |....\"P.|...A....|
|00002f60| 00 0e 0b 2e 06 cc 08 d0 | d1 d2 5c 22 53 5c 22 89 |........|..\"S\".|
|00002f70| 1e 13 d4 58 83 b6 00 0e | 13 cd 3d 83 6a 00 d5 82 |...X....|..=.j...|
|00002f80| d5 00 0e 13 d6 3d 83 75 | 00 d7 82 d5 00 0e 13 d8 |.....=.u|........|
|00002f90| 3d 83 80 00 d9 82 d5 00 | 0e 13 da 3d 83 8b 00 db |=.......|...=....|
|00002fa0| 82 d5 00 0e 13 dc 3d 83 | 96 00 dd 82 d5 00 0e 13 |......=.|........|
|00002fb0| d4 3d 83 a1 00 de 82 d5 | 00 ce df 0e 13 e0 58 83 |.=......|......X.|
|00002fc0| ae 00 e1 82 af 00 e2 0e | 13 5c 5c 5c 22 82 d5 00 |........|.\\\"...|
|00002fd0| 0e 13 e3 55 83 c1 00 e4 | 82 d5 00 0e 13 0e 25 58 |...U....|......%X|
|00002fe0| 83 d0 00 e6 0e 13 21 82 | d5 00 ce e7 0e 13 5c 22 |......!.|......\"|
|00002ff0| 29 50 87 08 39 83 e2 00 | ce e8 08 5c 22 87 e9 ea |)P..9...|...\"...|
|00003000| 08 5c 22 87 22 20 5b 63 | 68 20 22 41 43 48 4d 73 |.\"." [c|h "ACHMs|
|00003010| 53 22 20 47 35 32 33 32 | 39 20 2d 31 20 47 35 32 |S" G5232|9 -1 G52|
|00003020| 33 33 30 20 6e 69 6c 20 | 70 66 20 28 34 31 39 34 |330 nil |pf (4194|
|00003030| 33 30 34 20 36 37 31 30 | 38 38 36 34 20 31 36 37 |304 6710|8864 167|
|00003040| 37 37 32 31 36 20 2d 31 | 33 34 32 31 37 37 32 38 |77216 -1|34217728|
|00003050| 20 38 33 38 38 36 30 38 | 20 33 33 35 35 34 34 33 | 8388608| 3355443|
|00003060| 32 29 20 47 35 32 33 33 | 31 20 62 69 74 20 22 22 |2) G5233|1 bit ""|
|00003070| 20 47 35 32 33 33 32 20 | 6c 6f 67 61 6e 64 20 30 | G52332 |logand 0|
|00003080| 20 66 6f 72 6d 61 74 20 | 22 25 63 2d 22 20 6c 73 | format |"%c-" ls|
|00003090| 68 20 31 20 31 38 20 63 | 68 32 20 33 32 20 22 4e |h 1 18 c|h2 32 "N|
|000030a0| 55 4c 22 20 39 20 22 54 | 41 42 22 20 31 30 20 22 |UL" 9 "T|AB" 10 "|
|000030b0| 4c 46 44 22 20 31 33 20 | 22 52 45 54 22 20 32 37 |LFD" 13 |"RET" 27|
|000030c0| 20 22 45 53 43 22 20 22 | 53 50 43 22 20 22 43 2d | "ESC" "|SPC" "C-|
|000030d0| 25 63 22 20 32 36 20 39 | 36 20 36 34 20 31 32 37 |%c" 26 9|6 64 127|
|000030e0| 20 22 44 45 4c 22 20 6d | 61 78 6b 65 79 20 63 68 | "DEL" m|axkey ch|
|000030f0| 61 72 2d 74 6f 2d 73 74 | 72 69 6e 67 20 22 5c 5c |ar-to-st|ring "\\|
|00003100| 25 6f 22 20 22 3c 25 73 | 3e 22 20 65 72 72 6f 72 |%o" "<%s|>" error|
|00003110| 20 22 55 6e 72 65 63 6f | 67 6e 69 7a 65 64 20 69 | "Unreco|gnized i|
|00003120| 74 65 6d 20 69 6e 20 6d | 61 63 72 6f 3a 20 25 73 |tem in m|acro: %s|
|00003130| 22 5d 20 37 5d 20 70 6f | 73 20 74 69 6d 65 73 20 |"] 7] po|s times |
|00003140| 65 64 6d 61 63 72 6f 2d | 6d 69 73 6d 61 74 63 68 |edmacro-|mismatch|
|00003150| 20 22 25 64 2a 25 73 22 | 20 22 5c 6e 22 20 6d 61 | "%d*%s"| "\n" ma|
|00003160| 6b 65 2d 73 74 72 69 6e | 67 20 33 20 38 20 39 20 |ke-strin|g 3 8 9 |
|00003170| 22 3b 3b 20 22 20 73 79 | 6d 62 6f 6c 2d 6e 61 6d |";; " sy|mbol-nam|
|00003180| 65 20 37 32 20 22 5c 6e | 20 22 5d 20 39 5d 29 0a |e 72 "\n| "] 9]).|
|00003190| 23 40 32 30 36 20 43 6f | 6d 70 61 72 65 20 53 45 |#@206 Co|mpare SE|
|000031a0| 51 31 20 77 69 74 68 20 | 53 45 51 32 2c 20 72 65 |Q1 with |SEQ2, re|
|000031b0| 74 75 72 6e 20 69 6e 64 | 65 78 20 6f 66 20 66 69 |turn ind|ex of fi|
|000031c0| 72 73 74 20 6d 69 73 6d | 61 74 63 68 69 6e 67 20 |rst mism|atching |
|000031d0| 65 6c 65 6d 65 6e 74 2e | 0a 52 65 74 75 72 6e 20 |element.|.Return |
|000031e0| 6e 69 6c 20 69 66 20 74 | 68 65 20 73 65 71 75 65 |nil if t|he seque|
|000031f0| 6e 63 65 73 20 6d 61 74 | 63 68 2e 20 20 49 66 20 |nces mat|ch.  If |
|00003200| 6f 6e 65 20 73 65 71 75 | 65 6e 63 65 20 69 73 20 |one sequ|ence is |
|00003210| 61 20 70 72 65 66 69 78 | 20 6f 66 20 74 68 65 0a |a prefix| of the.|
|00003220| 6f 74 68 65 72 2c 20 74 | 68 65 20 72 65 74 75 72 |other, t|he retur|
|00003230| 6e 20 76 61 6c 75 65 20 | 69 6e 64 69 63 61 74 65 |n value |indicate|
|00003240| 73 20 74 68 65 20 65 6e | 64 20 6f 66 20 74 68 65 |s the en|d of the|
|00003250| 20 73 68 6f 72 74 65 64 | 20 73 65 71 75 65 6e 63 | shorted| sequenc|
|00003260| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 65 |e...(def|alias 'e|
|00003270| 64 6d 61 63 72 6f 2d 6d | 69 73 6d 61 74 63 68 20 |dmacro-m|ismatch |
|00003280| 23 5b 28 63 6c 2d 73 65 | 71 31 20 63 6c 2d 73 65 |#[(cl-se|q1 cl-se|
|00003290| 71 32 20 63 6c 2d 73 74 | 61 72 74 31 20 63 6c 2d |q2 cl-st|art1 cl-|
|000032a0| 65 6e 64 31 20 63 6c 2d | 73 74 61 72 74 32 20 63 |end1 cl-|start2 c|
|000032b0| 6c 2d 65 6e 64 32 29 20 | 22 c0 89 89 89 19 1a 1b |l-end2) |".......|
|000032c0| 1c 0d 84 10 00 0e 06 47 | 15 0e 07 84 1a 00 0e 08 |.......G|........|
|000032d0| 47 16 07 09 83 ef 00 0e | 09 0d 57 83 db 00 0e 5c |G.......|..W....\|
|000032e0| 6e 0e 07 57 83 db 00 5c | 66 83 61 00 5c 66 5c 6e |n..W...\|f.a.\f\n|
|000032f0| 83 40 00 5c 6e 0e 06 0d | 53 9c 21 82 45 00 0e 06 |.@.\n...|S.!.E...|
|00003300| 0d 53 9c 5c 6e 83 54 00 | 5c 6e 0e 08 0e 07 53 9c |.S.\n.T.|\n....S.|
|00003310| 21 82 5a 00 0e 08 0e 07 | 53 9c 5c 22 3f 0b 3d 82 |!.Z.....|S.\"?.=.|
|00003320| cd 00 5c 6e 83 6f 00 5c | 6e 0e 06 0d 53 9c 21 82 |..\n.o.\|n...S.!.|
|00003330| 74 00 0e 06 0d 53 9c a7 | 83 a4 00 5c 6e 83 86 00 |t....S..|...\n...|
|00003340| 5c 6e 0e 06 0d 53 9c 21 | 82 8b 00 0e 06 0d 53 9c |\n...S.!|......S.|
|00003350| 5c 6e 83 9a 00 5c 6e 0e | 08 0e 07 53 9c 21 82 a0 |\n...\n.|...S.!..|
|00003360| 00 0e 08 0e 07 53 9c 9a | 82 cd 00 5c 6e 83 b2 00 |.....S..|...\n...|
|00003370| 5c 6e 0e 06 0d 53 9c 21 | 82 b7 00 0e 06 0d 53 9c |\n...S.!|......S.|
|00003380| 5c 6e 83 c6 00 5c 6e 0e | 08 0e 07 53 9c 21 82 cc |\n...\n.|...S.!..|
|00003390| 00 0e 08 0e 07 53 9c 3d | 83 db 00 0d 53 15 0e 07 |.....S.=|....S...|
|000033a0| 53 16 07 82 1e 00 0e 09 | 0d 57 84 ea 00 0e 5c 6e |S.......|.W....\n|
|000033b0| 0e 07 57 85 78 02 0d 53 | 82 78 02 0e 06 3c 85 fa |..W.x..S|.x...<..|
|000033c0| 00 0e 09 0e 06 9b 0e 08 | 3c 85 05 01 0e 5c 6e 0e |........|<....\n.|
|000033d0| 08 9b 1e 0b 1e 5c 66 0e | 09 0d 57 83 66 02 0e 5c |.....\f.|..W.f..\|
|000033e0| 6e 0e 07 57 83 66 02 5c | 66 83 76 01 5c 66 5c 6e |n..W.f.\|f.v.\f\n|
|000033f0| 83 36 01 5c 6e 0e 5c 66 | 83 2d 01 0e 5c 66 40 82 |.6.\n.\f|.-..\f@.|
|00003400| 32 01 0e 06 0e 09 48 21 | 82 46 01 0e 5c 66 83 41 |2.....H!|.F..\f.A|
|00003410| 01 0e 5c 66 40 82 46 01 | 0e 06 0e 09 48 5c 6e 83 |..\f@.F.|....H\n.|
|00003420| 5f 01 5c 6e 0e 0b 83 56 | 01 0e 0b 40 82 5b 01 0e |_.\n...V|...@.[..|
|00003430| 08 0e 5c 6e 48 21 82 6f | 01 0e 0b 83 6a 01 0e 0b |..\nH!.o|....j...|
|00003440| 40 82 6f 01 0e 08 0e 5c | 6e 48 5c 22 3f 0b 3d 82 |@.o....\|nH\"?.=.|
|00003450| 4c 02 5c 6e 83 8f 01 5c | 6e 0e 5c 66 83 86 01 0e |L.\n...\|n.\f....|
|00003460| 5c 66 40 82 8b 01 0e 06 | 0e 09 48 21 82 9f 01 0e |\f@.....|..H!....|
|00003470| 5c 66 83 9a 01 0e 5c 66 | 40 82 9f 01 0e 06 0e 09 |\f....\f|@.......|
|00003480| 48 a7 83 f9 01 5c 6e 83 | bc 01 5c 6e 0e 5c 66 83 |H....\n.|..\n.\f.|
|00003490| b3 01 0e 5c 66 40 82 b8 | 01 0e 06 0e 09 48 21 82 |...\f@..|.....H!.|
|000034a0| cc 01 0e 5c 66 83 c7 01 | 0e 5c 66 40 82 cc 01 0e |...\f...|.\f@....|
|000034b0| 06 0e 09 48 5c 6e 83 e5 | 01 5c 6e 0e 0b 83 dc 01 |...H\n..|.\n.....|
|000034c0| 0e 0b 40 82 e1 01 0e 08 | 0e 5c 6e 48 21 82 f5 01 |..@.....|.\nH!...|
|000034d0| 0e 0b 83 f0 01 0e 0b 40 | 82 f5 01 0e 08 0e 5c 6e |.......@|......\n|
|000034e0| 48 9a 82 4c 02 5c 6e 83 | 12 02 5c 6e 0e 5c 66 83 |H..L.\n.|..\n.\f.|
|000034f0| 09 02 0e 5c 66 40 82 0e | 02 0e 06 0e 09 48 21 82 |...\f@..|.....H!.|
|00003500| 5c 22 02 0e 5c 66 83 1d | 02 0e 5c 66 40 82 5c 22 |\"..\f..|..\f@.\"|
|00003510| 02 0e 06 0e 09 48 5c 6e | 83 3b 02 5c 6e 0e 0b 83 |.....H\n|.;.\n...|
|00003520| 32 02 0e 0b 40 82 37 02 | 0e 08 0e 5c 6e 48 21 82 |2...@.7.|...\nH!.|
|00003530| 4b 02 0e 0b 83 46 02 0e | 0b 40 82 4b 02 0e 08 0e |K....F..|.@.K....|
|00003540| 5c 6e 48 3d 83 66 02 0e | 5c 66 41 16 5c 66 0e 0b |\nH=.f..|\fA.\f..|
|00003550| 41 16 0b 0e 09 54 16 09 | 0e 5c 6e 54 16 5c 6e 82 |A....T..|.\nT.\n.|
|00003560| 09 01 0e 09 0d 57 84 75 | 02 0e 5c 6e 0e 07 57 85 |.....W.u|..\n..W.|
|00003570| 77 02 0e 09 2a 2c 87 22 | 20 5b 6e 69 6c 20 63 6c |w...*,."| [nil cl|
|00003580| 2d 66 72 6f 6d 2d 65 6e | 64 20 63 6c 2d 6b 65 79 |-from-en|d cl-key|
|00003590| 20 63 6c 2d 74 65 73 74 | 2d 6e 6f 74 20 63 6c 2d | cl-test|-not cl-|
|000035a0| 74 65 73 74 20 63 6c 2d | 65 6e 64 31 20 63 6c 2d |test cl-|end1 cl-|
|000035b0| 73 65 71 31 20 63 6c 2d | 65 6e 64 32 20 63 6c 2d |seq1 cl-|end2 cl-|
|000035c0| 73 65 71 32 20 63 6c 2d | 73 74 61 72 74 31 20 63 |seq2 cl-|start1 c|
|000035d0| 6c 2d 73 74 61 72 74 32 | 20 63 6c 2d 70 32 20 63 |l-start2| cl-p2 c|
|000035e0| 6c 2d 70 31 5d 20 35 20 | 28 23 24 20 2e 20 31 32 |l-p1] 5 |(#$ . 12|
|000035f0| 36 39 34 29 5d 29 0a 23 | 40 31 36 35 20 52 65 74 |694)]).#|@165 Ret|
|00003600| 75 72 6e 20 74 68 65 20 | 73 75 62 73 65 71 75 65 |urn the |subseque|
|00003610| 6e 63 65 20 6f 66 20 53 | 45 51 20 66 72 6f 6d 20 |nce of S|EQ from |
|00003620| 53 54 41 52 54 20 74 6f | 20 45 4e 44 2e 0a 49 66 |START to| END..If|
|00003630| 20 45 4e 44 20 69 73 20 | 6f 6d 69 74 74 65 64 2c | END is |omitted,|
|00003640| 20 69 74 20 64 65 66 61 | 75 6c 74 73 20 74 6f 20 | it defa|ults to |
|00003650| 74 68 65 20 6c 65 6e 67 | 74 68 20 6f 66 20 74 68 |the leng|th of th|
|00003660| 65 20 73 65 71 75 65 6e | 63 65 2e 0a 49 66 20 53 |e sequen|ce..If S|
|00003670| 54 41 52 54 20 6f 72 20 | 45 4e 44 20 69 73 20 6e |TART or |END is n|
|00003680| 65 67 61 74 69 76 65 2c | 20 69 74 20 63 6f 75 6e |egative,| it coun|
|00003690| 74 73 20 66 72 6f 6d 20 | 74 68 65 20 65 6e 64 2e |ts from |the end.|
|000036a0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 65 64 6d |..(defal|ias 'edm|
|000036b0| 61 63 72 6f 2d 73 75 62 | 73 65 71 20 23 5b 28 73 |acro-sub|seq #[(s|
|000036c0| 65 71 20 73 74 61 72 74 | 20 26 6f 70 74 69 6f 6e |eq start| &option|
|000036d0| 61 6c 20 65 6e 64 29 20 | 22 08 3b 83 5c 6e 00 08 |al end) |".;.\n..|
|000036e0| 09 5c 6e 4f 87 c3 1c 5c | 6e 83 1d 00 5c 6e c5 57 |.\nO...\|n...\n.W|
|000036f0| 83 1d 00 5c 6e 08 47 89 | 14 5c 5c 12 09 c5 57 83 |...\n.G.|.\\...W.|
|00003700| 2e 00 09 5c 66 86 2c 00 | 08 47 89 14 5c 5c 11 08 |...\f.,.|.G..\\..|
|00003710| 3c 83 67 00 09 c5 56 83 | 3d 00 09 08 9b 10 5c 6e |<.g...V.|=.....\n|
|00003720| 83 61 00 c3 1e 06 5c 6e | 53 89 12 09 59 83 5a 00 |.a....\n|S...Y.Z.|
|00003730| 08 89 41 10 40 0e 06 42 | 16 06 82 44 00 0e 06 9f |..A.@..B|...D....|
|00003740| 29 82 9d 00 c7 08 21 82 | 9d 00 5c 6e 84 72 00 5c |).....!.|..\n.r.\|
|00003750| 66 86 71 00 08 47 12 c8 | 5c 6e 09 5a c5 5d c3 5c |f.q..G..|\n.Z.].\|
|00003760| 22 c5 1e 09 1e 06 09 5c | 6e 57 83 9a 00 0e 06 0e |"......\|nW......|
|00003770| 09 08 09 48 49 88 0e 09 | 54 16 09 09 54 89 11 82 |...HI...|T...T...|
|00003780| 80 00 0e 06 2a 29 87 22 | 20 5b 73 65 71 20 73 74 |....*)."| [seq st|
|00003790| 61 72 74 20 65 6e 64 20 | 6e 69 6c 20 6c 65 6e 20 |art end |nil len |
|000037a0| 30 20 72 65 73 20 63 6f | 70 79 2d 73 65 71 75 65 |0 res co|py-seque|
|000037b0| 6e 63 65 20 6d 61 6b 65 | 2d 76 65 63 74 6f 72 20 |nce make|-vector |
|000037c0| 69 5d 20 35 20 28 23 24 | 20 2e 20 31 33 38 32 31 |i] 5 (#$| . 13821|
|000037d0| 29 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 65 |)]).(def|alias 'e|
|000037e0| 64 6d 61 63 72 6f 2d 66 | 69 78 2d 6d 65 6e 75 2d |dmacro-f|ix-menu-|
|000037f0| 63 6f 6d 6d 61 6e 64 73 | 20 23 5b 28 6d 61 63 72 |commands| #[(macr|
|00003800| 6f 29 20 22 c0 09 21 83 | 49 00 c2 c3 1c 89 1d 09 |o) "..!.|I.......|
|00003810| 47 57 83 48 00 09 0d 48 | 89 14 3a 83 41 00 5c 66 |GW.H...H|..:.A.\f|
|00003820| 41 40 41 40 c6 9a 83 3c | 00 c7 c8 09 c2 0d 23 c9 |A@A@...<|......#.|
|00003830| ca 5c 66 40 5c 22 c8 09 | 0d 54 5c 22 23 11 0d 54 |.\f@\"..|.T\"#..T|
|00003840| 15 82 41 00 cb cc cd 5c | 22 88 0d 54 89 15 82 0b |..A....\|"..T....|
|00003850| 00 2a 09 87 22 20 5b 76 | 65 63 74 6f 72 70 20 6d |.*.." [v|ectorp m|
|00003860| 61 63 72 6f 20 30 20 6e | 69 6c 20 65 76 20 69 20 |acro 0 n|il ev i |
|00003870| 28 6d 65 6e 75 2d 62 61 | 72 29 20 76 63 6f 6e 63 |(menu-ba|r) vconc|
|00003880| 61 74 20 65 64 6d 61 63 | 72 6f 2d 73 75 62 73 65 |at edmac|ro-subse|
|00003890| 71 20 76 65 63 74 6f 72 | 20 6d 65 6e 75 2d 62 61 |q vector| menu-ba|
|000038a0| 72 20 65 72 72 6f 72 20 | 22 4d 61 63 72 6f 73 20 |r error |"Macros |
|000038b0| 77 69 74 68 20 6d 6f 75 | 73 65 20 63 6c 69 63 6b |with mou|se click|
|000038c0| 73 20 61 72 65 20 6e 6f | 74 20 25 73 22 20 22 73 |s are no|t %s" "s|
|000038d0| 75 70 70 6f 72 74 65 64 | 20 62 79 20 74 68 69 73 |upported| by this|
|000038e0| 20 63 6f 6d 6d 61 6e 64 | 22 5d 20 37 5d 29 0a 28 | command|"] 7]).(|
|000038f0| 64 65 66 61 6c 69 61 73 | 20 27 65 64 6d 61 63 72 |defalias| 'edmacr|
|00003900| 6f 2d 70 61 72 73 65 2d | 6b 65 79 73 20 23 5b 28 |o-parse-|keys #[(|
|00003910| 73 74 72 69 6e 67 20 26 | 6f 70 74 69 6f 6e 61 6c |string &|optional|
|00003920| 20 6e 65 65 64 2d 76 65 | 63 74 6f 72 29 20 22 c0 | need-ve|ctor) ".|
|00003930| c1 c2 1b 1c 1d 5c 66 0e | 06 47 57 83 31 02 c7 c8 |.....\f.|.GW.1...|
|00003940| 0e 06 5c 66 23 83 31 02 | 0e 06 c1 94 c1 95 4f c0 |..\f#.1.|......O.|
|00003950| c9 1e 5c 6e 1e 0b 1e 5c | 66 c1 95 14 c7 cd 0e 5c |..\n...\|f......\|
|00003960| 66 5c 22 83 44 00 ce 0e | 5c 66 c1 c9 95 4f 21 16 |f\".D...|\f...O!.|
|00003970| 5c 6e 0e 5c 66 c9 95 54 | c0 4f 16 5c 66 c7 cf 0e |\n.\f..T|.O.\f...|
|00003980| 5c 66 5c 22 83 6d 00 d0 | d1 d2 21 d3 3d 83 59 00 |\f\".m..|..!.=.Y.|
|00003990| d4 82 61 00 d5 d3 21 40 | 86 61 00 d6 0e 5c 66 d7 |..a...!@|.a...\f.|
|000039a0| d8 4f d9 23 16 0b 82 0f | 02 c7 da 0e 5c 66 5c 22 |.O.#....|....\f\"|
|000039b0| 83 98 00 0e 5c 66 c9 94 | c9 95 4f 0e 5c 66 db 94 |....\f..|..O.\f..|
|000039c0| db 95 4f 50 16 5c 66 c7 | dc 0e 5c 66 5c 22 84 98 |..OP.\f.|..\f\"..|
|000039d0| 00 dd 0e 5c 66 21 43 16 | 0b 82 0f 02 0e 5c 66 de |...\f!C.|.....\f.|
|000039e0| 9a 84 a7 00 c7 df 0e 5c | 66 5c 22 83 b1 00 c7 e0 |.......\|f\".....|
|000039f0| 0e 06 5c 66 23 14 82 0f | 02 0e 5c 66 c1 89 1e 21 |..\f#...|..\f...!|
|00003a00| 1e 5c 22 1e 23 c7 e4 0e | 5c 66 5c 22 83 df 00 0e |.\".#...|\f\"....|
|00003a10| 21 0e 5c 66 c1 48 e5 9e | 41 5c 5c 16 21 0e 5c 22 |!.\f.H..|A\\.!.\"|
|00003a20| d7 5c 5c 16 5c 22 0e 5c | 66 d7 c0 4f 16 5c 66 82 |.\\.\".\|f..O.\f.|
|00003a30| bb 00 c7 e6 0e 5c 66 5c | 22 83 f9 00 0e 21 e7 5c |.....\f\|"....!.\|
|00003a40| 5c 16 21 0e 5c 22 54 16 | 5c 22 0e 5c 66 c9 c0 4f |\.!.\"T.|\".\f..O|
|00003a50| 16 5c 66 e8 0e 5c 66 e9 | 5c 22 89 1e 2a 83 09 01 |.\f..\f.|\"..*...|
|00003a60| 0e 2a 41 16 5c 66 29 c7 | eb 0e 5c 66 5c 22 83 57 |.*A.\f).|..\f\".W|
|00003a70| 01 0e 5c 66 1e 2c ed 1e | 2e c0 1e 2f c0 1e 30 f1 |..\f.,..|.../..0.|
|00003a80| 1e 32 0e 2e 54 89 16 2e | 0e 2c 47 57 83 50 01 0e |.2..T...|.,GW.P..|
|00003a90| 2c 0e 2e 48 16 2f 0e 32 | 83 3f 01 c1 82 48 01 0e |,..H./.2|.?...H..|
|00003aa0| 30 f3 5f 0e 2f 5c 5c f4 | 5c 5c 16 30 c0 16 32 82 |0._./\\.|\\.0..2.|
|00003ab0| 5c 22 01 f5 0e 30 21 16 | 5c 66 2d 0e 21 c1 55 83 |\"...0!.|\f-.!.U.|
|00003ac0| 65 01 0e 5c 66 16 0b 82 | 0e 02 0e 21 f6 55 83 b0 |e..\f...|...!.U..|
|00003ad0| 01 0e 5c 66 3b 83 b0 01 | c7 f7 0e 5c 66 5c 22 83 |..\f;...|...\f\".|
|00003ae0| b0 01 0e 5c 66 1e 38 ed | 1e 39 c0 1e 3a c0 1e 3b |...\f.8.|.9..:..;|
|00003af0| 0e 39 54 89 16 39 0e 38 | 47 57 83 a7 01 0e 38 0e |.9T..9.8|GW....8.|
|00003b00| 39 48 89 16 3a 0e 21 5c | 5c 0e 3b 42 16 3b 82 87 |9H..:.!\|\.;B.;..|
|00003b10| 01 0e 3b 9f 2c 16 0b 82 | 0e 02 0e 5c 66 47 c9 55 |..;.,...|...\fG.U|
|00003b20| 84 c7 01 fc fd 0e 23 c1 | 0e 5c 22 4f 0e 5c 66 23 |......#.|.\"O.\f#|
|00003b30| 88 82 0e 02 fe 0e 21 e7 | 5c 22 c1 55 84 04 02 0e |......!.|\".U....|
|00003b40| 5c 66 3b 83 04 02 c7 ff | 0e 5c 66 5c 22 83 04 02 |\f;.....|.\f\"...|
|00003b50| 0e 21 0e 5c 66 81 40 00 | 9a 83 f0 01 81 41 00 82 |.!.\f.@.|.....A..|
|00003b60| f9 01 fe 0e 5c 66 c1 48 | 81 42 00 5c 22 5c 5c 81 |....\f.H|.B.\"\\.|
|00003b70| 43 00 5c 5c 43 16 0b 82 | 0e 02 0e 21 0e 5c 66 c1 |C.\\C...|...!.\f.|
|00003b80| 48 5c 5c 43 16 0b 2b 0e | 0b 83 2d 02 0e 5c 6e 1e |H\\C..+.|..-..\n.|
|00003b90| 44 0e 44 53 89 16 44 c1 | 59 83 2c 02 d0 0b 0e 0b |D.DS..D.|Y.,.....|
|00003ba0| 5c 22 13 82 18 02 29 2b | 82 06 00 0b 47 81 45 00 |\"....)+|....G.E.|
|00003bb0| 59 83 70 02 0b c1 48 81 | 46 00 3d 83 70 02 0b c9 |Y.p...H.|F.=.p...|
|00003bc0| 48 81 47 00 3d 83 70 02 | 0b 89 47 d7 5a 48 81 46 |H.G.=.p.|..G.ZH.F|
|00003bd0| 00 3d 83 70 02 0b 89 47 | c9 5a 48 81 48 00 3d 83 |.=.p...G|.ZH.H.=.|
|00003be0| 70 02 81 49 00 0b d7 d8 | 23 13 0e 4a 84 06 03 0b |p..I....|#..J....|
|00003bf0| 1e 4b ed 1e 4c c0 1e 2f | f1 1e 4d 0e 4c 54 89 16 |.K..L../|..M.LT..|
|00003c00| 4c 0e 4b 47 57 83 b6 02 | 0e 4b 0e 4c 48 89 16 2f |L.KGW...|.K.LH../|
|00003c10| a8 85 b0 02 fe 0e 2f 81 | 4e 00 5c 22 89 1e 4f c1 |....../.|N.\"..O.|
|00003c20| 59 85 af 02 0e 4f 81 41 | 00 58 29 89 16 4d 84 81 |Y....O.A|.X)..M..|
|00003c30| 02 0e 4d 85 bc 02 f1 2c | 83 06 03 0b 1e 50 ed 1e |..M....,|.....P..|
|00003c40| 51 c0 1e 2f c0 1e 52 0e | 51 54 89 16 51 0e 50 47 |Q../..R.|QT..Q.PG|
|00003c50| 57 83 fd 02 0e 50 0e 51 | 48 16 2f fe 0e 2f f6 5c |W....P.Q|H./../.\|
|00003c60| 22 c1 55 83 ef 02 0e 2f | 82 f5 02 0e 2f 81 53 00 |".U..../|..../.S.|
|00003c70| 5c 5c 0e 52 42 16 52 82 | cc 02 0e 52 9f 2c b0 01 |\\.RB.R.|...R.,..|
|00003c80| 82 07 03 0b 2b 87 22 20 | 5b 6e 69 6c 20 30 20 5b |....+." |[nil 0 [|
|00003c90| 5d 20 72 65 73 20 70 6f | 73 20 63 61 73 65 2d 66 |] res po|s case-f|
|00003ca0| 6f 6c 64 2d 73 65 61 72 | 63 68 20 73 74 72 69 6e |old-sear|ch strin|
|00003cb0| 67 20 73 74 72 69 6e 67 | 2d 6d 61 74 63 68 20 22 |g string|-match "|
|00003cc0| 5b 5e 20 09 5c 6e 5c 66 | 5d 2b 22 20 31 20 74 69 |[^ .\n\f|]+" 1 ti|
|00003cd0| 6d 65 73 20 6b 65 79 20 | 77 6f 72 64 20 22 5c 5c |mes key |word "\\|
|00003ce0| 28 5b 30 2d 39 5d 2b 5c | 5c 29 5c 5c 2a 2e 22 20 |([0-9]+\|\)\\*." |
|00003cf0| 73 74 72 69 6e 67 2d 74 | 6f 2d 69 6e 74 20 22 5e |string-t|o-int "^|
|00003d00| 3c 3c 2e 2b 3e 3e 24 22 | 20 76 63 6f 6e 63 61 74 |<<.+>>$"| vconcat|
|00003d10| 20 6b 65 79 2d 62 69 6e | 64 69 6e 67 20 5b 2d 31 | key-bin|ding [-1|
|00003d20| 33 34 32 31 37 36 30 38 | 5d 20 65 78 65 63 75 74 |34217608|] execut|
|00003d30| 65 2d 65 78 74 65 6e 64 | 65 64 2d 63 6f 6d 6d 61 |e-extend|ed-comma|
|00003d40| 6e 64 20 5b 2d 31 33 34 | 32 31 37 36 30 38 5d 20 |nd [-134|217608] |
|00003d50| 77 68 65 72 65 2d 69 73 | 2d 69 6e 74 65 72 6e 61 |where-is|-interna|
|00003d60| 6c 20 5b 2d 31 33 34 32 | 31 37 36 30 38 5d 20 32 |l [-1342|17608] 2|
|00003d70| 20 2d 32 20 22 0d 22 20 | 22 5e 5c 5c 28 5c 5c 28 | -2 "." |"^\\(\\(|
|00003d80| 5b 41 43 48 4d 73 53 5d | 2d 5c 5c 29 2a 5c 5c 29 |[ACHMsS]|-\\)*\\)|
|00003d90| 3c 5c 5c 28 2e 2b 5c 5c | 29 3e 24 22 20 33 20 22 |<\\(.+\\|)>$" 3 "|
|00003da0| 5c 5c 3c 5c 5c 28 4e 55 | 4c 5c 5c 7c 52 45 54 5c |\\<\\(NU|L\\|RET\|
|00003db0| 5c 7c 4c 46 44 5c 5c 7c | 45 53 43 5c 5c 7c 53 50 |\|LFD\\||ESC\\|SP|
|00003dc0| 43 5c 5c 7c 44 45 4c 5c | 5c 29 24 22 20 69 6e 74 |C\\|DEL\|\)$" int|
|00003dd0| 65 72 6e 20 22 52 45 4d | 22 20 22 5e 3b 3b 22 20 |ern "REM|" "^;;" |
|00003de0| 22 24 22 20 62 69 74 73 | 20 70 72 65 66 69 78 20 |"$" bits| prefix |
|00003df0| 6f 72 69 67 2d 77 6f 72 | 64 20 22 5e 5b 41 43 48 |orig-wor|d "^[ACH|
|00003e00| 4d 73 53 5d 2d 2e 22 20 | 28 28 36 35 20 2e 20 34 |MsS]-." |((65 . 4|
|00003e10| 31 39 34 33 30 34 29 20 | 28 36 37 20 2e 20 36 37 |194304) |(67 . 67|
|00003e20| 31 30 38 38 36 34 29 20 | 28 37 32 20 2e 20 31 36 |108864) |(72 . 16|
|00003e30| 37 37 37 32 31 36 29 20 | 28 37 37 20 2e 20 2d 31 |777216) |(77 . -1|
|00003e40| 33 34 32 31 37 37 32 38 | 29 20 28 31 31 35 20 2e |34217728|) (115 .|
|00003e50| 20 38 33 38 38 36 30 38 | 29 20 28 38 33 20 2e 20 | 8388608|) (83 . |
|00003e60| 33 33 35 35 34 34 33 32 | 29 29 20 22 5e 5c 5c 5e |33554432|)) "^\\^|
|00003e70| 2e 24 22 20 36 37 31 30 | 38 38 36 34 20 61 73 73 |.$" 6710|8864 ass|
|00003e80| 6f 63 20 28 28 22 4e 55 | 4c 22 20 2e 20 22 00 22 |oc (("NU|L" . "."|
|00003e90| 29 20 28 22 52 45 54 22 | 20 2e 20 22 0d 22 29 20 |) ("RET"| . ".") |
|00003ea0| 28 22 4c 46 44 22 20 2e | 20 22 5c 6e 22 29 20 28 |("LFD" .| "\n") (|
|00003eb0| 22 54 41 42 22 20 2e 20 | 22 09 22 29 20 28 22 45 |"TAB" . |".") ("E|
|00003ec0| 53 43 22 20 2e 20 22 1b | 22 29 20 28 22 53 50 43 |SC" . ".|") ("SPC|
|00003ed0| 22 20 2e 20 22 20 22 29 | 20 28 22 44 45 4c 22 20 |" . " ")| ("DEL" |
|00003ee0| 2e 20 22 7f 22 29 29 20 | 66 6f 75 6e 64 20 22 5e |. ".")) |found "^|
|00003ef0| 5c 5c 5c 5c 5b 30 2d 37 | 5d 2b 24 22 20 47 35 32 |\\\\[0-7|]+$" G52|
|00003f00| 33 33 36 20 2d 31 20 47 | 35 32 33 33 37 20 63 68 |336 -1 G|52337 ch|
|00003f10| 20 6e 20 74 20 47 35 32 | 33 33 38 20 38 20 2d 34 | n t G52|338 8 -4|
|00003f20| 38 20 76 65 63 74 6f 72 | 20 2d 31 33 34 32 31 37 |8 vector| -134217|
|00003f30| 37 32 38 20 22 5e 2d 3f | 5b 30 2d 39 5d 2b 24 22 |728 "^-?|[0-9]+$"|
|00003f40| 20 47 35 32 33 33 39 20 | 47 35 32 33 34 30 20 78 | G52339 |G52340 x|
|00003f50| 20 47 35 32 33 34 31 20 | 65 72 72 6f 72 20 22 25 | G52341 |error "%|
|00003f60| 73 20 6d 75 73 74 20 70 | 72 65 66 69 78 20 61 20 |s must p|refix a |
|00003f70| 73 69 6e 67 6c 65 20 63 | 68 61 72 61 63 74 65 72 |single c|haracter|
|00003f80| 2c 20 6e 6f 74 20 25 73 | 22 20 6c 6f 67 61 6e 64 |, not %s|" logand|
|00003f90| 20 22 5b 40 2d 5f 2e 61 | 2d 7a 3f 5d 22 20 22 3f | "[@-_.a|-z?]" "?|
|00003fa0| 22 20 31 32 37 20 33 31 | 20 2d 36 37 31 30 38 38 |" 127 31| -671088|
|00003fb0| 36 34 20 47 35 32 33 34 | 32 20 34 20 32 34 20 34 |64 G5234|2 4 24 4|
|00003fc0| 30 20 34 31 20 65 64 6d | 61 63 72 6f 2d 73 75 62 |0 41 edm|acro-sub|
|00003fd0| 73 65 71 20 6e 65 65 64 | 2d 76 65 63 74 6f 72 20 |seq need|-vector |
|00003fe0| 47 35 32 33 34 33 20 47 | 35 32 33 34 34 20 47 35 |G52343 G|52344 G5|
|00003ff0| 32 33 34 35 20 31 33 34 | 32 31 37 37 32 37 20 63 |2345 134|217727 c|
|00004000| 68 32 20 47 35 32 33 34 | 36 20 47 35 32 33 34 37 |h2 G5234|6 G52347|
|00004010| 20 47 35 32 33 34 38 20 | 31 32 38 5d 20 36 5d 29 | G52348 |128] 6])|
|00004020| 0a 23 40 35 38 34 20 49 | 6e 73 65 72 74 20 69 6e |.#@584 I|nsert in|
|00004030| 20 62 75 66 66 65 72 20 | 74 68 65 20 64 65 66 69 | buffer |the defi|
|00004040| 6e 69 74 69 6f 6e 20 6f | 66 20 6b 62 64 20 6d 61 |nition o|f kbd ma|
|00004050| 63 72 6f 20 4e 41 4d 45 | 2c 20 61 73 20 4c 69 73 |cro NAME|, as Lis|
|00004060| 70 20 63 6f 64 65 2e 0a | 4f 70 74 69 6f 6e 61 6c |p code..|Optional|
|00004070| 20 73 65 63 6f 6e 64 20 | 61 72 67 20 4b 45 59 53 | second |arg KEYS|
|00004080| 20 6d 65 61 6e 73 20 61 | 6c 73 6f 20 72 65 63 6f | means a|lso reco|
|00004090| 72 64 20 74 68 65 20 6b | 65 79 73 20 69 74 20 69 |rd the k|eys it i|
|000040a0| 73 20 6f 6e 0a 28 74 68 | 69 73 20 69 73 20 74 68 |s on.(th|is is th|
|000040b0| 65 20 70 72 65 66 69 78 | 20 61 72 67 75 6d 65 6e |e prefix| argumen|
|000040c0| 74 2c 20 77 68 65 6e 20 | 63 61 6c 6c 69 6e 67 20 |t, when |calling |
|000040d0| 69 6e 74 65 72 61 63 74 | 69 76 65 6c 79 29 2e 0a |interact|ively)..|
|000040e0| 0a 54 68 69 73 20 4c 69 | 73 70 20 63 6f 64 65 20 |.This Li|sp code |
|000040f0| 77 69 6c 6c 2c 20 77 68 | 65 6e 20 65 78 65 63 75 |will, wh|en execu|
|00004100| 74 65 64 2c 20 64 65 66 | 69 6e 65 20 74 68 65 20 |ted, def|ine the |
|00004110| 6b 62 64 20 6d 61 63 72 | 6f 20 77 69 74 68 20 74 |kbd macr|o with t|
|00004120| 68 65 20 73 61 6d 65 0a | 64 65 66 69 6e 69 74 69 |he same.|definiti|
|00004130| 6f 6e 20 69 74 20 68 61 | 73 20 6e 6f 77 2e 20 20 |on it ha|s now.  |
|00004140| 49 66 20 79 6f 75 20 73 | 61 79 20 74 6f 20 72 65 |If you s|ay to re|
|00004150| 63 6f 72 64 20 74 68 65 | 20 6b 65 79 73 2c 20 74 |cord the| keys, t|
|00004160| 68 65 20 4c 69 73 70 20 | 63 6f 64 65 0a 77 69 6c |he Lisp |code.wil|
|00004170| 6c 20 61 6c 73 6f 20 72 | 65 62 69 6e 64 20 74 68 |l also r|ebind th|
|00004180| 6f 73 65 20 6b 65 79 73 | 20 74 6f 20 74 68 65 20 |ose keys| to the |
|00004190| 6d 61 63 72 6f 2e 20 20 | 4f 6e 6c 79 20 67 6c 6f |macro.  |Only glo|
|000041a0| 62 61 6c 20 6b 65 79 20 | 62 69 6e 64 69 6e 67 73 |bal key |bindings|
|000041b0| 0a 61 72 65 20 72 65 63 | 6f 72 64 65 64 20 73 69 |.are rec|orded si|
|000041c0| 6e 63 65 20 65 78 65 63 | 75 74 69 6e 67 20 74 68 |nce exec|uting th|
|000041d0| 69 73 20 4c 69 73 70 20 | 63 6f 64 65 20 61 6c 77 |is Lisp |code alw|
|000041e0| 61 79 73 20 6d 61 6b 65 | 73 20 67 6c 6f 62 61 6c |ays make|s global|
|000041f0| 0a 62 69 6e 64 69 6e 67 | 73 2e 0a 0a 54 6f 20 73 |.binding|s...To s|
|00004200| 61 76 65 20 61 20 6b 62 | 64 20 6d 61 63 72 6f 2c |ave a kb|d macro,|
|00004210| 20 76 69 73 69 74 20 61 | 20 66 69 6c 65 20 6f 66 | visit a| file of|
|00004220| 20 4c 69 73 70 20 63 6f | 64 65 20 73 75 63 68 20 | Lisp co|de such |
|00004230| 61 73 20 79 6f 75 72 20 | 60 7e 2f 2e 65 6d 61 63 |as your |`~/.emac|
|00004240| 73 27 2c 0a 75 73 65 20 | 74 68 69 73 20 63 6f 6d |s',.use |this com|
|00004250| 6d 61 6e 64 2c 20 61 6e | 64 20 74 68 65 6e 20 73 |mand, an|d then s|
|00004260| 61 76 65 20 74 68 65 20 | 66 69 6c 65 2e 1f 0a 28 |ave the |file...(|
|00004270| 64 65 66 61 6c 69 61 73 | 20 27 69 6e 73 65 72 74 |defalias| 'insert|
|00004280| 2d 6b 62 64 2d 6d 61 63 | 72 6f 20 23 5b 28 6d 61 |-kbd-mac|ro #[(ma|
|00004290| 63 72 6f 6e 61 6d 65 20 | 26 6f 70 74 69 6f 6e 61 |croname |&optiona|
|000042a0| 6c 20 6b 65 79 73 29 20 | 22 c0 19 c2 0b 21 c4 98 |l keys) |"....!..|
|000042b0| 83 13 00 c5 20 11 c6 63 | 88 82 1d 00 c5 0b 21 11 |.... ..c|......!.|
|000042c0| c7 c8 0b 5c 22 63 88 09 | 47 c9 56 83 2a 00 ca 63 |...\"c..|G.V.*..c|
|000042d0| 88 82 2d 00 cb 63 88 cc | 09 70 5c 22 88 cd 63 88 |..-..c..|.p\"..c.|
|000042e0| 0e 0e 85 58 00 cf 0b d0 | 5c 22 89 1e 0e 85 57 00 |...X....|\"....W.|
|000042f0| c7 d1 0e 0e 40 0b 23 63 | 88 0e 0e 41 89 16 0e 84 |....@.#c|...A....|
|00004300| 44 00 c0 29 29 87 22 20 | 5b 6e 69 6c 20 64 65 66 |D..))." |[nil def|
|00004310| 69 6e 69 74 69 6f 6e 20 | 73 79 6d 62 6f 6c 2d 6e |inition |symbol-n|
|00004320| 61 6d 65 20 6d 61 63 72 | 6f 6e 61 6d 65 20 22 22 |ame macr|oname ""|
|00004330| 20 66 6f 72 6d 61 74 2d | 6b 62 64 2d 6d 61 63 72 | format-|kbd-macr|
|00004340| 6f 20 22 28 73 65 74 71 | 20 6c 61 73 74 2d 6b 62 |o "(setq| last-kb|
|00004350| 64 2d 6d 61 63 72 6f 22 | 20 66 6f 72 6d 61 74 20 |d-macro"| format |
|00004360| 22 28 64 65 66 61 6c 69 | 61 73 20 27 25 73 22 20 |"(defali|as '%s" |
|00004370| 35 30 20 22 20 28 72 65 | 61 64 2d 6b 62 64 2d 6d |50 " (re|ad-kbd-m|
|00004380| 61 63 72 6f 5c 6e 22 20 | 22 5c 6e 20 20 28 72 65 |acro\n" |"\n  (re|
|00004390| 61 64 2d 6b 62 64 2d 6d | 61 63 72 6f 20 22 20 70 |ad-kbd-m|acro " p|
|000043a0| 72 69 6e 31 20 22 29 29 | 5c 6e 22 20 6b 65 79 73 |rin1 "))|\n" keys|
|000043b0| 20 77 68 65 72 65 2d 69 | 73 2d 69 6e 74 65 72 6e | where-i|s-intern|
|000043c0| 61 6c 20 28 6b 65 79 6d | 61 70 29 20 22 28 67 6c |al (keym|ap) "(gl|
|000043d0| 6f 62 61 6c 2d 73 65 74 | 2d 6b 65 79 20 25 53 20 |obal-set|-key %S |
|000043e0| 27 25 73 29 5c 6e 22 5d | 20 35 20 28 23 24 20 2e |'%s)\n"]| 5 (#$ .|
|000043f0| 20 31 36 34 32 33 29 20 | 22 43 49 6e 73 65 72 74 | 16423) |"CInsert|
|00004400| 20 6b 62 64 20 6d 61 63 | 72 6f 20 28 6e 61 6d 65 | kbd mac|ro (name|
|00004410| 29 3a 20 5c 6e 50 22 5d | 29 0a 28 70 72 6f 76 69 |): \nP"]|).(provi|
|00004420| 64 65 20 28 71 75 6f 74 | 65 20 65 64 6d 61 63 72 |de (quot|e edmacr|
|00004430| 6f 29 29 0a             |                         |o)).    |        |
+--------+-------------------------+-------------------------+--------+--------+